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ABSTRACT 


The function of the DMC11 diagnostics 1s to verify that the 
option operates according to specifications. The diagnostics 
verfig that there are no malfunctions and the all operations 
of the DMC11 are correct in its environment. 


Parameters must be set up to alert the diagnostics to the 
DMC11 configuration. hese parameters are contained in the 
STATUS T and are generated in two ways: 1) Manual 
Input - the operator anSwers questions. 2) Autosizing - the 
program determines the parameters automatically. 


DZOMF tests the DMC-11 Line Unit (M8201 or M8202). It 
performs write/read tests on the DMC Line Unit registers. it 
checks for proper transmitter, receiver, and BCC operation in 
BITSTUFF mode. The modem signals are also checked. DZDMF 
requires a OMC Micro-Processor (M8200 or M3204) to run. For 
best diagnosis a turn-around connector should be installed, 
= gece @ diagnostic will run without it (some tests are 
skipped). 


Currently there are five off line diagnostics that are to be 
rum im sequence to insure that if an error should occur it 
will be detected at an early stage. 

NOTE: Additional diagnostics may be added in the future. 

The five diagnostics are: 

DZDMC [REV] Basic W/R and Micro-processor tests 

DZDME [REV] DOCMP Line unit tests 

DZDMF [REV] BITSTUFF Line unit tests 

DZDMG [REV] Jump and Crom tests 

DZDMH [REV] Free-running tests (Heat test tape) 
REGUIREMENTS 

EQUIPMENT 


Any POP11 yore CPU (except an LSI-11) with minimum SK memory 
1 
8) 


int Wome 


ASE 33 (or eguilivalent) 
OMCLI-AR with OMC11-0R or OMCLI-FA or 
UMC LI-“AL with OMC11-MA cr DMCLI-MD 


fu 
fu 


we oo 
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STORAGE 


Breer ee will use all 8K of memory gxcegt where ABL and 
BOOTSTRAP LOADER reside. Locations 1500 thru 1640; contain 
the “STATUS TABLE” information which is generated at start of 
diagnostics by manual input (questions) or automatically 
Cau Ay gt This area is an overlay area and should not te 
altered by the operator. 


LOADING PROCEEDURE 

METHOD 

All programs are in absolute format and are loaded using the 
ABSO ute LOADER. TE: if the diagnostics are on a media such 
as DISK ,MAGTAPE,DECTAPE, or CASSETTE; follow instructions 
for the monitor which has been provided on that specific 
media. 

ABSOLUTE LOADER starting address #500 


MEMORY # SIZE 


Sk i7 
Sk 37 
ick $7 
1&k 77 
20k 117 
24k 137 
28k 157 


Place address of ABS loader into switch register. 
(alse place ‘HALT’ SW up) 


Depress “LOAD ADDRESS’ key on console and release. 


Depress “START KEY* sn console and release (program should now 
te loading inte CPU) 
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STARTING PROCEEDURE 
Bes mt ong eas tee to 000200 


eeerans .t ADDRESS * Key and relea 
to oe for "AUTO SIZING’ or “Sur bitO=1 for manual 
ut Ty a promt or SWR bit7=1 to use existing parameters 
oe aprevious start or a previously run OMC1 
dtagebetlc. 
a. Depress "START KEY’ and release. The program will typ 
Maindec Name and - gram name (if this was the first star 
up of the program) and also the following: 


MAP OF DMC11 STATUS 


ove 
. . . 


@ 
t 


PC CSR STATL STAT2 STAT3 


001500 160010 145310 177777 900000 
001510 160020 145320 177777 000000 


The program will type ‘R’ a“ o proceed to run the diagnostic. 

The above is only an oon le. This would indicate the status 
table starting at 7: in the proeres, In 7 nd 
the table contains the Estarantion & and tus of two DMC11°S. 

THE STATUS TABLE MUST BE VERIFIED BY THE *ISeR IF AUTO EtDIKG 
4 BO For information of status table see section 8.4 for 
elp. 


If the diagnostic was started with SWOO=1 asi oesiey manual 
parameter input then the following shows an examele of the 
questions asked and some example answers: 


HOW MANY DMC1i’S TO BE TESTED71 


01 
CSR_ADDRESS? 160010 

VECTOR RODRESS? 3 10 

BR PRIORITY LEV 219 (4 

DOES MICRO-PROCESSOR WAGE Oaean Y OR NIN 

WHICH LINE UNIT? IF NONE TYPE “y IF M6201 TYPE “1", IF 


e202 

IS THE LOOP BACK CONNECT ay 
SWITCH PAC#1l (DDCMP LINE#)?377 
SWITCH PAC#2 (BM873 BOOT ADD) 7377 


Following the questions the status map is printed out as 
described above, the ae ee in the map reflects the 
answers to the pegtions, If_the diagnostic was started with 


=0 and 7=0 PRutO-SIZING) then ro soe tiene are asked 
and "he the status-map is printed out. AUTO-SIZING 1s 
sed e status information must be ileal to be correct 


(match the hardware). aif it does not match the hardware the 
ssageestis must be restarted with SWOO=] and the questions 
answereé 
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CONTROL SWITCH SETTINGS 
SW iS Set: Halt on error 


SW 14 Set: Loop on current test 

SW 13 Set: Inhibit error print out 

SW l2 Set: Inhibit type out/abell on error. 

SW 11 Set: pet iterations. (quick pass) 

SW 18 Set: Escape to next test on error 

SW O39 Set: Loop with current data 

SW O8 Set: Catch error and loop on it 

SW O7 Set: Use previous status table. 

SW O& Set: Halt in ROMCLK routine before clocking 
microprocessor 

SW OS Set: Reserved 

SW OY Set: Reserved 

SW O3 Set: Reselect DMCI1’s desired active 

SW O2 Set: Lock on selected test 

SW Ol Set: Restart program at selected test 

SW O00 Set: Build new status table from questions. (If SWO7=0 


and SWOO=0 a new status table is built by 
auto-sizing) 


Switch O& and O8-15 are dynamic and can be changed as needed 

while the diagnostic is running. Switches OO-03 and switch 07 

re eed th and are used only Gn starting or restarting the 
sagnostic. 
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SWITCH REGISTER OPTIONS (at start up) 


RESTART PROGRAM AT SELECTED TEST. It is strongly 
suggested that at least one pass has been made before 
trying to select a test, the reason being is that the 
rogram has to clear areas and set up parameters. 
hen this switch is used the diagnostic will ask TEST 

NO.” Answer by typing the nuabir of the test desired 
pes saneiga return to Begin execution at the selected 
est. 


LOCK ON SELECTED TEST. This switch 
SWOl will cause the program to constantly loop on the 
selected test. Hitting any key on the Console will 
let it advance to the next test and loop until a key 
is hit again. If SWO2=0 when SWOl is used. The 
program will begin at the selected test and continue 
normal operations. 


RESELECT DMC11°S DESIRED ACTIVE. Please note that a 
message is typed out for setting the switch register 
equal to DMC11"s active. this means if the system has 
four DMClls;_ bits 01,02,03 will be set in loc 
“DMACTV’ from the switch’ register. Using this 
switch(SWOO) alters that location; therefore if four 
DMClls are in the system ##*D0 NOTHE# set switchs 
greater than SW O03 in the up position. this would be 
a fatal error. do nct select more active DMClls_ thar 
there is information on in the status table. 


A: Load address 200 

B: Start with SW OO0=1 

Cs Program will type message 

C Set a switch for each DMC desired active. 
EXAMPLE: If you have 4 DMC’s but ony want te 
run the first and the last set SWR bits 0 and 
3 = 1. PRESS CONTINUE 

Number (IF VALID) will be in data lights 
Cercluding 1170S) 

Set with eeu other switch settings desired. 
PRESS CONTIAUE. 


when used with 
ntl 
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DYNAMIC SWITCHES 
ERROR SWITCHES 


« SW 12 Delete print out/bell on error. 

e. SW13 Delete error printout. 

as Halt on the error. 

4. W Goto beginning of the test(on error). 
S. Goto neti testlon error). 


1. SWO6 Halt in  ROMCLK routine before clocking 
micro-processor instruction. This allows the 
Sedge to scope a micro-processor instruction in 
the static state before it is clocked. Hit 
* continue to resume running. 
2. SwWO9 (if enabled by *SCOP1") on an error; If an "#" is 
gs in front of the test no. lex. TEST NO. 
O ) SWOS is incorporated in that test and 
therefore SWO9 is usually the best switch for the 
scape loop (SUL4=0, Sul0=0, SWOS=1, SWOS=0). If 
SWOS is not enabeled; and there is a HARD error 
(constant): SWOB is best. (SW14=1,0, SW10=0 
SWO9=0, SWOB=1). for intermittemt errors; SW14=1 
will veep on test reguardless of error or not 
error. (SW14=1, SWi0=0, SWO9=0, SWOS=1,0) 
3. SWil Inhibit interations. 
4. SW14 Loop on current test. 


STARTING ADDRESS 


Starting address is at 000200 there are no other starting 
addresses for the OMC11 diagnostics. (See Section 4.0) 


NOTE: If address OOOOQ42 is non-zero the program assumes it 
is under ACT11 or XXDP control and will act 
accordingly after all available OMC11’s are tested the 
program gift return to ‘XXDP’ or *ACT-11". 


OPERATING PROCEDURE 
When program is initially started messages as described in 


section 4.0 will be printed, and program will begin running 
the diagnostic 
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PROGRAM AND’“OR OPERATOR ACTION 
Tne typical approach should be 


tg Halt on error (via SW 15=1) when ever an error occurs. 
& Clear SW 15S. 

J. Set SW 14: (loop on this test) 

t., Set SW 13: Cimhibit error print out) 


The TEST NUMBER and PC will be typed out and possibily an 
error message (this depends on the test) to give the operator 
an idea as to the source of the problem. If it is nongssery 
to know more information concerning the error report; LOOK I 
THE LISTING for that TEST NUMBER which was typed out and then 
NOTE THE PC of thE ERROR REPORT this way the EXACT FUNCTION of 
the test CAN BE DETERMINED. 


ERRORS 


As described previously there will always be a TEST NUMBER and 

PC yoed out at the time of an error (providing SW 13=0 and SW 

12=0)3. in most cases additional information will be supplied 

fs the the error message to give the operator an indication of 
¢ error. 


ERROR RECOVERY 


If for some reason the ODOMC11 should ‘HANG THE BUS’ (gain 
control of bus so that console manual functions are inhibited) 
an init or power down/up is necessary for cperator to regain 
contre] cf cpu. If this should hogpees look im location 
TSTNO’ (address 1226)for the number of the test that was 
running at the time of the catastrophic error. In this way 
the operator will have an idea as to what the OMC11 was doing 
at the time of the error. 


RESTRICTIONS 
STARTING RESTRICTIONS 


See section 4. (PLEASE) 

Status table should be verified reguardless of how program was 

started. Also it 1s important to use this listing along with 
ns, foteraetign printed on the TTY to completly i8o0late 
protlems. 
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OPERATING RESTRICTIONS 


a first ting 8 ae es tag is — into core - — 

e must be setiu is 18 @ magual inpu 

(SWOU=1) or by gupesiaing (subd=0 and sb 9to3! Pherealter 

however the ‘status table need not be setup by subsequent 
restarts or even loading the next DMC diagnostic because the 
yaTUS resi e is over faved. The current parameters in the 
TATUS TABLE are used when SWO7=1 on start up. 


HARDWARE CONFIGURATION RESTRICTIONS 


DMC11(MB200)- Jumper Wl must be in, and switch 7 of E76 must 
be in the OFF position. 


KMC(MB204)- Jumper Wl must be in. 


LINE UNIT(M8201)- Jumpers Wl, We, and WY must be IN. Jumpers 
WS, and WS must be OUT. SW8 of E26 must be in the ON 
position. 


LINE UNIT (M8202)- Jumper Wi must be in. SWS of Ee& must be 
in the OFF position. 


MISCELLANEOUS 
EXECUTION TIME 


All DMC11 device diagnostics will give an "END PASS’ message 
- ony © no errors and swl2=0) within 4S mins. This is 
assuming SWi1l=1 (DELETE ITERATIONS) is set to give the fastest 
possible execution. The actual execution time depends greatly 
on — PDP11 CPU configuration and the amount of memory in the 
system. 


PASS COMPLETE 


NOTE: EVERY time the program is started; the tests will run 
as_ if SWli (delete iterations) was up (=1). This is to 

HARD ER * as soon as possible. Therefore the 
first pass -EACH TIME PROGRAM IS STARTED- will be a “QUICK 
PASS’ until all OMC11’s in system are tested. When the 
diagnostic has completed a pass the following 1s an example of 
the print out to be expected. 


END PASS DZDMC CSR: 175000 VEC: 0300 PASSES: 000001 
ERRORS: 000000 


NOTE: The pass count and error counts are cummulitive for 
each DMCi1 that is running, and are set to zero only 
when the diagnostic is started. Therefore after an 
groraignt run for esengle the total passes and errors 
for gath DMC11 since the diagnostic was started are 
reflected in PASSES: and ERRORS:. 
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KEY LOCATIONS 


RETURN (1214) apatetes * - address where A ge will return 
when eration sbent is reachéd or if loop on 
test is asserte 


NEXT (1216) Contains the address of the next test to be 
peformed. 


TSTNO (1226) Contains the number of the test now being 
peformed. 


RUN (1316) The bit in ‘a always points to the OMC11 
current] ein tested. EXAMPLE: (RUN) 
{302/00040000010 O000 Means that DMC11 no.06 
is the DMC11 now running. 


DMCROO-DMCR17 
DMSTOO-DMST17 
(1500)-( 1640) 
These locations contain the information needed 


to test to * ideciegl! ls sequential 
they contain he VECTOR and. sta TOS 
conterning the ae ey of each rate 


DMACTY (1306) Each bit set ir this location indicates that 
the associated DMC11 will be tested in turn 
EXAMPLE: (DMACTV) i /0 008 11111 means 
that DMC11 no. oy be tested. 
EXAMPLE: (DMACTV) 1246 /b0000000000 10001 Means 
that OMC11 no. 00,04 will be tested. 


DMCSR (1402) fenjeias the CSR of the current OMC11 under 
est. 


"STATUS TABLE’ (1500-1640) 


The table is filled by AUTO SIZING or by the rer parameter 
input ( pont sense as described previous! Iso if desired b 
user; locations may be altered by a” (toggled in) ¢t 
suit’ the "leona configuration. 


The ozenri¢.s status me fae below contains information for 
two the tab can contain up to 16 ODMC11°S. 
rai lowing the map is a  . H. of the bits for each mag 
entry 


MAP OF DMC11 STATUS 


PC CSR STATL STAT2 STATI 


001500 160010 145310 177777 000000 
001510 160020 016320 900000 000000 
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the first of the 4 words is. In the ezample above 
DMC’S status is in locations, 1500) 5 ‘ 12/99! and 1S06. The 
an 


econd DMC status is located at 1 
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status 
firs 
1516. 


he information contained in each 4 word entry is defined as 


follows: 


CSR: 
STATI: 


STAT2: 


STAT32: 


Contains DMC11 CSR address 


00-08 IS DMC11 VECTOR ADDRESS 
ICRO-PROCESSOR HAS CRAM 


I 
URNAROUND CONNECTOR IS ON 
URNAROUND CONNECTOR 


iis 


mw 


CS bh ee 
< own iv 


O~— 


E IS SWITCH PAC#1 (DOCMP LINE NUMBER) 
ET ITCH PAC#2 (BM873 BOOT ADD) 


S 
FREE RUNNING TESTS ON KMC11 
1-AR (LOW SPEED) 

1-AL (HIGH SPEED) 


-O~- DW 
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METHOD OF AUTO SIZING 
FINDING THE CONTROL STATUS REGISTER. 


The auto-sizing routine finds a DMC11 as follows: It starts 
at address 1 and tests all address in increments of 10 up 
to and including address 167760. If the address does not time 
cut, the pon tonten is done, the first CROM address is written 
to a 125252 then if is read back. If it contains a <-1 or 
125252 a ~ 


or 626 or S20 a DMC11 has been found, if not 
address is updated by 10 and the search continues. A 
indicates a DMC11 with no CROM or CRAM, a indicates a 
KMC11 with CRAM, a 626 indicates a DMCLI-AL and a 16520 
indicates DMC1I-AR. Further tests are performed at this point 
to determine which line unit, if any, is installed, if a 
loop-back connector is installed and various switch settings 
S IS WHY THE STATUS TABLE T 


on the line unit. 

RIFIED BY THE USER AND IF ANY OF THE INFORMATION DOES NOT 
AGREE WITH THE HARDWARE THE DIAGNOSTIC MUST BE RESTARTED AND 
THE QUESTIONS MUST BE ANSWERED. All DMC11’s in the system 
will be found by the auto-sizer. If it does not find a 11 
the diagnostic must be restarted and the questions answered. 


FINDING THE VECTOR AND BR LEVEL 


The vector area (address 300-776) is filled with the 
instruction IOT and °.42’ (next address). The processor 
status is started at 7 and the DMC (ig to interrupt. 
The PS is lowered ~ 1 until the interrupts, a soley is 
made and if no interupt occures at PS level 3 (because of a 
bad DMC11) the progres assumes vector address 300 at level 
S and the problem should be fixed in the diagnostic. Once the 
problem is fixed; the program should be tgrcetas again to get 
correct vector. If an interupt occured; the address to which 
the OMC11 interupted to is picked up and reported as the 
vector. NOTE: if the vector reported is not the vector set 
up by you; there is a problem and AUTO SIZING should not be 
one. 


SOFTWARE SWITCH REGISTER 


If the diagnostic is run on an 11/04 or other CPU without a 
switch register then a software switch register is used to 
allow user the same switch options as described previously. 
If the hardware switch register does not exist or if one does 
and it contains all ones (177777) this software switch 
register is used. 


Control: 


To obtain control at any allowable time during execution of 
the diagnostic the operator types a CTRL é on the console 
terminal soyneerd, As scon as the CTRL G is recognized, by 
the diagnostic, the following message wil] be displayed: 
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SWR=XXXXXX NEW? 


Where XXXXXX is the current contents of the software switch 
register in octal. The software contro] routine will then 
await operator action. At which time the corn is required 
o type one or more of the legal characters: 1) 0 - 7, 2) 
line Yeed(<LF>), 3) carriage return(<CR>), or 4) control-U 
(CTRL U) No check is made for ser? If the input 
character is not a <LF>, <CR>, or CTRL U 
an octal digit. 


t is assumed tc be 


To change the contents of the SSR the operator +—s types 
the new desired value in octal - eager zeros need not be 
typed. And terminates the input string with a <CR> or <LF> 
Sagereen on the program action desired as described below. 
The input value will be truncated to the last & digits typed. 
At least one digit must be typed on any given input string 
prior to the terminator before a change to the SSR will occur. 


When the input string is terminated with a <CR> the diagnostic 
will continue execution from the point at which it was 
interrupted. If a <CR> is the only thing typed the program 
will continue without changing the SSR. The <L*> differs Trom 
the <CR> by restarting the program as if it were restarted at 
address 200. 


{fe CTRL U is typed at any point in the input string pricr to 
the terminator he _~ value will be disregarded and the 
prompt displayed (SWR = XXXXXX NEW?). 


To set the SSR for the starting switches, first load the 
diagnostic, then hit CTRL G, then start the diagnostic. 


POGE: 


0013 


DECOOC VER 00.04% I11-JUL-77 12:04 PAGE O01 PAGE: 0014 


OcONF LST 


CUME 
HELEPEESELELESE 


DZOMF LST 
SRELEREREREL SD 


COPYRIGHT 1977 
DIGITAL EGUIPMENT CORPORATION 
MAYNARD, MASS. C1754 


i691 


1769 


i811 


i8S3 


1963 


COe2 


MAINDEC-11-DZDMF-B  _OMC11 BITSTUFF LINE UNIT TESTS 
COPYRIGHT 1976, DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 01754 
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REVERESERESESPRHEERESSEREE Test ] RHRRSRREARRRAAE SLES SLED TEESE 
OUT CON GISTER READ/ONLY 
DO A MASTER CLEAR VERIFY THAT ae READ/ONLY 

BITS ARE IN THE CORRECT STATE 


SEERRARERRSRRRERERRERESEESS TEST OC BRSRRREREERESE TASER EEE E SEES 
IN CONTROL REGISTER READ/ONLY 

DO A MASTER CLEAR VERIFY. THAT ALL READ/ONLY 

BITS ARE IN THE CORRECT STATE 


SESEERLERLERLE EEA RRE RL EEE TEST 3 SEEHSEESSERERERER ERTS TREE 
MODEM CONTROL REGISTER REAQ/ ONL T 
DO A MASTER CLEAR, VERIFY THAT i READ/ONLY 

BITS ARE IN THE CORRECT STATE 


SELRSKFRSSRAESLALRRSRRKLAEEE TEST Y SHERSSSRASRASRRS HRS RRA REDS 
MTINTENANCE REGISTER READ/ONLY TEST 

BO Q MASTER CLEAR, VERIFY THAT ALL READ/ONLY 

BITS QRE IN THE CORRECT STATE 


SHEARER, SEEERSEERSERESEEEE TEST S SeRERREEEEREEE RAE A ARETE EES 
LINE UNI) REGISTER WRITE/READ TEST 

SET BITS Ii. LU REGISTER 12, VERIFY IT IS SET 

CLEAR BITS 1W LU REGISTER le, VERIFY IT IS CLEAR 


SHELARESASERERRSHERSEERARES TEST & See RESHSERRERERRA EEL LE ELE TS 
INE UNIT REGISTER WRITE/READ Test 
SET BIT1 IN LU REGISTER 17, VERIFY IT IS SET 

CLEAR BIT IN LU REGISTER 17, VERIFY IT IS CLEAR 


JUMHMHEHHHHHHHHHHHHHHHEHEEE TEST 7 SeteeEEEEEEESEEESEEEREEEEES 
LINE wy REGISTER WRITE/READ TEST 

FLOAT THROUGH LINE UNIT REGISTER 13 

FLOAT a 4 THROUGH LINE UNIT REGISTER 13 


SSKELEERARRREERERERSESEESE TEST 10 See eee eee ee se eed es eer ee eset 
LINE UNIT REGISTER WRITE/READ TEST 

FLOAT A 1 THROUGH LINE UNIT REGISTER 14 

FLOAT A O THROUGH LINE UNIT REGISTER 14 


SELAESEREERASSREAAESEEEELRE TEST |] Seeeeeete teeta eee eeeeceeses 
SWITCH PAC TEST 

THIS TEST READS SWITCH PACS! 

THIS SWITCH PAC CONTAINS THE DDCMP LINE # 


11-JUL-77 12:04 
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1985 


2007 


2040 


2125 


2186 


2334 
2335 
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RERSRERRSRRSESSRRERREEREER TEST 12 SHeeeeeHERRAEEERA SESE E REESE 
SWITCH PAC TEST 

THIS TEST READS SWITCH PAC#e 

THIS SWITCH PAC CONTAINS THE BM873 BOOT ADD 


RELRHRARHERERRRSRERRRREEES TEST 13 Se eeeeeeRERRERER ERE ELE SESE 
LINE UNIT CLOCK TEST 

THIS TEST VERIFYS THAT THE LU INTERNAL CLOCK 

(BIT 1 IN LU-17) IS WORKING 


SHERRRRESRSSRERERREREEREEE TEST 14 ReRRRRRREREE ERAS EL RSLS SESS 
OUT DATA SILO TEST 

SET SOM AND LOAD OUT DATA SILO 

VERIFY THAT OCOR SET, INDICATING THAT THE 

CHARACTER IS AT THE BOTTOM OF THE OUT SILO 


sesusneutvesgenueeuseaents TEST 15 HeKRRRRHRRS SERA ES ESLL ESE SSS 
BITSTUFF TEST OF R A! ACTIVE 
yu SOM AND LOAD aR DATA SILO 

SINGLE STEP 2 DATA CLOCKS, VERIFY 
THAT RTS AND ACTIVE ARE SET 


eer a ean TEST 16 4eRReRRSSERESAAR SER ELE RESTS 
TEST OF OUT 
SET S SILO 


OM AND ORD OUT DATA 
SINGLE STEP DATA CLOCK, SET OUT CLEAR 
VERIFY THAT OCOR,RTS, AND ACTIVE ARE CLEARED 


Ag te a TEST 17 HHRREERAESSERSRER SESE EE ELSE 


CHECK FL A_IN 

VERIFY EACH BIT roar ton AS IT 

PASSES THE BIT WINDOW (SI BIT) 

Oti AN ERROR, R3 CONTAINS BIT POSITION OF FAILURE 


SESRSERRSSERERRESREREELEEE TEST OD Sek keRERREEARARAS EEE ATEALES 
BITSTUFF TRANSMITTER TEST 

SINGLE ork OCK THE ee it pep 

CHECK FLAG AND DATA IN THE aft WINDOW 

VERIFY EACH BIT rehire AS IT 

Ao THE BIT WI BIT) 

ON AN ERROR, R3 CONTAINE BIT POSITION OF FAILURE 


SRELHEAELARSRRESSERERSERES TEST 2] eee eeREREREAAEES RELEASES ERE 


BITSTUFF TRANSMITTER TEST 
SINGLE CLOCK THE eg ER 252 
CHECK FLAG AND DATA IN THE BIT WINDOW 
pad ha +e iM at The AS + 
PASSES THE BIT WINDOW (SI BIT 
ON GN ERRCR, R3 CONTAINS BIT POSITION OF FAILURE 


L1-JUL-77 12:04 
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2408 “Tel - TEST 22 HEERHEEHEEREAERAEEEEEEEE SES 
THIS TEST CHECKS ZERO BIT STUFFING OF 
THE TRANSMITTER IN THE BIT WINDOW 


248s pereceysereresnenesecaneys TEST 23 RHRERREREREAEEK EE ERLE SESE 
S 


K TER 377 
CHECK FLAG AND DATA IN THE BIT WINDOW 
VERIFY EACH BIT POSITION AS + 

oy i. BIT WINDOW (SI 

ON AN ERROR, R3 CONTAINS BIT POSITION OF FAILURE 


esés reestneressasireeeesninn TEST OY RHHRRRHREREEASEEES ELE EELS SS 
SINGLE CLOCK A BINARY aged  aaeee 


BIT) 
RROR. R3 CONTAINS BIT POSITION OF FAILURE 
OND ARS CONTAINS THE CHARACTER THAT FAILED 


2654 RERKASARERARRRSASASERRSEESE TEST 25 so Receeteeriem 


LAGS 
AND DATA ARE CORRECT AND FOLL OUED By +N ABORT 
SEQUENCE (8 CONTIGUOUS 1’°S) 


2729 RELLEERESEEERERERERAEAELES TEST Ob SRREEEESEESERSELS ALLER ERTL 
LEADING ZEROS TE 
VERIFY ye THE SETTING OF SOM AND EOM TOGETHER 
AND THEN SOM ALONE WILL GENERATE 16 LEADING ZEROS 

AND A FLAG, THE CHECK IS MADE USING THE BIT WINDOW 


2789 SEFLERAAARSLERSSESSLASEEEE TEST 27 HAARESSAAAEFLALALHESPAERFZLZE 
BrISTUFF STRIP FLAG TES 
SET LU LOOP, SINGLE STEP S F 
VERIFY THAT IN ACTIVE DOES NOT Fee 


2821 LLELLEREEEESEEREERERERREEE TEST 3D 2eeeeeEREEREREEEEE EERE DETER 
BITSTUFF IN ACTIVE TEST 
SET LU LOOP, SINGLE STEP S FLAGS AND A NON-FLAG (301) 
VERIFY THAT IN ACTIVE IS SET 


2253 Sg agit i ge a TEST 3] SeRRRHESRAREAERSRRERERERELE 
BIYSTUFF IN ACTIVE TEST 
SET LINE UNIT LOOP,SINGLE STE® ONE FLAG AND A CHAR (301) 
VERIFY THAT IN ACTIVE IS SET 


OZOMF LST 


2893 


2895 


2925 


2983 


3029 


3075 


3167 


3212 


2262 


02 


DECDOC VER 00.04 


REERAERRERAREEERRRAREEEEEH TEST JO RRRLEERERREEAE AEE EREEEEE EES 
BITSTUFF IN ACTIVE TEST 


SET LU LOOP, SINGLE STEP 2 FLAGS AND A NON-FLAG (301) 
VERIFY THAT IN ACTIVE IS SET 


JHE TEST 33 2eRRRREREEEEE REESE EER EE EES 
IN CLEAR TEST 

oy UP RECEIVER AND TRANSMIT ‘ CHARACTER 

WAIT FOR IN RDY, THEN SET IN 

VERIFY THAT IN ACTIVE AND IN ROY ARE CLEARED 


Sreenee GaaiC fECRICER TE » al JH RKRRKALRRAA RAR SEAS HAE REEL LE 
BITSTUFF BASIC RECEI 


VERIFY THAT IN" Roi GcSHOFE Sh Hh T SIE D WAS RECEIVED 


SERAAELESASRRSRRRSRRRERESS TEST QS RR eRRRRERERREERALERA ERE REESE 
BITSTUFF BASIC RECEICER TEST 

SYNC _UP VER AND SINGLE CLOCK THE CHARACTER ies Par, Be 
VERIFY THAT IN RDY IS SET, AND THAT THE CHARACTER WAS REZT* TC 


SRRRSERRSESRRSRRERRREREEEE TEST JG Re RRRRRREREREALA SERA EEE RES 
BITSTUFF BASIC RECEICER TEST 

SYNC UP RECEIVER AND SINGLE CLOCK THE CHARACTER 2S2 

VERIFY THAT IN RDY IS SET, AND THAT THE CHARACTER WAS RECEIVED 


SHRELALARESSRAARRRRREEERERE TEST 37 SRRRRERRERSESES EES PEELE LESS 
BITSTUFF BASIC RECEICER TEST 

SYNC UP RECEIVER AND SINGLE CLOCK THE CHARACTER 377 

VERIFY THAT IN RDY IS SET, AND THAT THE CHARACTER WAS RECEIVED 


SITSTIE DaTa lear TEST 4D SHHRRHRAERERRALES ERLE RE LEER 


BIT DATA TEST 
THIS TEST SINGLE STEPS A BINARY COUNT PATTERN 
CHECKING EACH CHARACTER AS IT IS RECEIVED 


og ape ye et rasa TEST 4] HERHRESERESSERR SSSR EEE E TEES 
BITSTUFF DATA TEST 

THIS TEST SINGLE STEPS A BINARY COUNT PATTERN 

CHECKING EACH CHARACTER AS IT IS RECEIVED 

THIS TEST IS EXACTLY THE SAME AS THE LAST TEST, 

EXCEPT LINE UNIT LOOP IS SET IN LU REGISTER le 


eee TEST YO £HRREREARERRALARARSRRAR EELS 
RECEIVER ABORT TEST 

SINGLE CLOCK a FLAGS, A 301 rye 301 AND 10 EXTRA 

CLOCK TICKS, VERIFY THAT A 301 AND A K 

WERE R rece tvtD INDICATING THAT THE RECEIVER RECOGINIZED 

THE ABORT SEQUENCE (8 CONTIGUIOUS 1°S: 


Li-JUL-77 12:04 


PAGE CS PAGE: 


oC 


' 
PY 


e 


3307 


3355 


3398 
3399 


3480 


3568 


GOe2 
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RELE TURNAROLRO TeeT TEST 43 RKFLAHKERALAAEKAASSRAAAAEEE 


ery tan + UNIT Lo SET OTR 
CLEAR OTR. TVEROEY N READY meby is CLEARED 
ay gt go ser TEST YY RHESRRERERERERRELARERE ESSERE 


CABLE T 
CLEAR LINE UNIT LOOP, LOAD OUT DATA SILO 
VERIFY THAT ALL MODEM SIGNALS ARE SET 


HLARAELAARSRERERKRRERREREE TEST YS Ree eee eee eee eee eee eke eee ses 


TEST OF CRC OPERATION 

USING ne CRC.CCITT rae. SINGLE ee THE CHARACTER 
QO, VERIFY THE LSB OF THE BCC EACH 

TEST TRANSMITTER FIRST THEN THE RECEIVER BCC 


RELEHRALHRLEHERARAREREHEESE TEST YR BERR ES ERA RAAEAEAELER EEE EE 

TEST OF CRC OPE 

ust NG THE CRC.CCITT Oe eck on ten cL 0GK THE CHARACTER 
VERIFY T Lae ot ty ON EACH SHIFT 

fest TRANSMITTER FIRST THEN THE RECEIVER BCC 


TEST OF CRC OPERATION TEST 47 eee RRRRERRRRREE ELSES LEAR LS 


Yu 
SING Oe RCC ecirt T POLYNOMIAL, SINGLE CLOCK THE CHARACTER 


ies t VERIEY TETAS THEN ThE OREEE IVER ace 


SLELERERARSRSRERERERERKEREE TEST SQ Se eee eee eee eee eee reece erase 


TEST OF CRC OPERATI 

USING vette CRC. CCITT POLYNOMIAL, SINGLE CLOCK THE CHARACTER 
VERIFY THE LSB OF THE BCC’ ON EACH SHIFT 

fet TRANSMITTER FIRST THEN THE RECEIVER BCC 


SRSRSRRERSESRERRERERREEREE TEST S] eee e ee eeee eee eee eeeda anaes 
TRANSMITTER CRC TES 

USING THE CRC.CCITT POLYNOMINAL, SINGLE CLOCK A BINARY 

COUNT PATTERN, VERIFY THE LSB OF THE TRANSMITTER SCC ON EACH SHIFT 
RECEIVER CRE TEST TEST SO eeeeeeeee seed eeeteeeeaerces 


RE CRC TES 
USIN CRC.CCITT POLYNOMINAL SINGLE f OCK A BINARY 
COUN PA TERN, VERIFY THE LSB OF THE RECEIVER BCC ON EACH SHIFT 


SRLAFHEEAFSAEREHLEREREAELSE TEST SQ eeeseeaneaceeeesesatesesese 
TRANSMITTER SITSTUFF CRC TES 


OZONE 


LST 


3983 


4038 


4100 


4413 


4746 


4810 


4913 


02 


THIS TEST TRANSMITS A FOUR CHARACTER oe WITH CRC 


Sat hPa cieateate bo Ie 1S 
THE TTER IS CHECKED FOR GOt MARK STATE AFTER THE BCC 


REERERSASERSRERRRERERERERE TEST SY RRRRRRRERRRE REE EEAR EEE EES 
RECEIVER Bi Terrr CRC TEST 
THIS TEST CLOCKS A FOUR CHARACTER MESSAGE g Se Bcc 
AND VERIFYS CORRECT DATA RECEPTION AND BCC MATCH 
FOUR CHARACTER MESSAGE IS 0, 12S, 2S2,377 


SRE REE TEST SS RARER RRESREEEEEEE EERE REET 
BITSTUFF E 


OM FUNCTION TEST 
THIS TEST LOADS OUT SILO ITH: : FLAGS, 4 CHAR MESSAGE, £OM 
4 CHARACTER less, EQN THE DATA STREAM {S CHECKED TO BE 


TO 
HAR. BCC, FLAG AG .MARKS. | THIS TEST VERIFYS THAT 
tae "GHAR TERS L “beats WiTH bon SET 
ALL DATA S ARE CHECKED IN +3 ai " urnoou 
THE FOUR BO ac tER MESSAGE IS 0,1 
RECEIVED DATA IS VERIFIED, AND th BOC MATCH IS CHECKED 


SERRSRRRRERSSERRSEREREERES TEST SG SRSRERRRRREEE EERE EREE EERE EE 
BITSTUFF EOM FUNCTION TEST 

THIS TEST LOADS OUT SILO ies SF FLAGS,4 CHAR MESSAGE ,E0M 
SOM,4 CHAR MESS,EOM. ee An IS CHECKED TO BE’ 

4 ager BCC FLAG 4 CHAR TABRKS oT HIS TEST VERIFYS THAT 


THE FOUR CHARACTER MESSAGE I 
RECEIVED DATA IS VERIFIED, AND On ae aatcn IS CHECKED 


wT sot TEST S7 RHRRRRRRRERSERR RAR ALT ASE ESE 
L 
LOAD SILO WITH 2 SYNCS, 4 CHAR MESSAGE, SINGLE CLOCK 
UNTIL THE SILO I§ emery, 4 MORE CHARACTERS IN THE 
SILO. GIVE MORE T Anb° CPRIFY THAT ONLY THE FIRST 
4 CHARACTERS AND i “Block END WERE RECEIVED, AND IN ACTIVE IS CLEAR 


REKSRARERRARERRERRREEERERE TEST 60 SERRE ERHREERERES ER RARER ESE 
BITSTUFF CABLE DATA TEST 

THIS TEST LOADS OUT SILO WITH THE FOLLOWING: 

2 FLAGS, 16 CHAR,EOM, 16 CHAR,EOM, 16 CHAR, EOM 

THE 16 CHARACTERS TACLUDE A’ FLOATING ONE AND ZERO Cee 

THE DATA 1S TRANSMITTED OVER THE CABLE USING THE INTERNAL CLOCK 
RECEIVED DATA IS VERIFIED AS IS IN BCC_MA 

RSOP-BACK CONNECTOR HUST BE ON TO RUN THIS TEST 


SRELALRAAARRARAREREEREREEEE TEST 6] 2ReSREREEERREAAAAR AAAS RAE 
BITSTUFF CABLE DATA TEST 

THIS et a hath OUT SILO WITH THE FOLLOWING: 

2 FLAGS,S3S DATA CHARACTERS,EOM WITH GARBAGE CHARACTER 

THE DATA IS TRANSMITTED OVER THE CABLE USING THE INTERNAL CLOCK 
RECEIVED DATA IS VERIFIED AS IS IN BCC MA 


= 
DECOOC VER 00.04 11-JUL-77 12:04 PAGE G7 PAGE: 


0022 
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LOOP-BACK CONNECTOR MUST BE ON TO RUN THIS TEST 
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HEEBDIRDGAATTFEN ofcr rR ebufPhENT CoRP HANARB, Rass. 01754 


STARTING PRC PROCEDURE 


es a bc PARAMETERS 
SW00=1 eitfu NEW DMC11 PARAMETERS 


Pree WILL TYPE enna ten 11-DZDMF-B OMC11 BITSTUFF LINE UNIT TESTS” 


;PROGRAM WILL TYPE STATUS 
;PROGRAM WILL TYPE “R” TO INDICATE THAT TESTING HAS STARTED 
:AT THE END OF A PASS, PROGRAM WILL TYPE PASS COMPLETE MESSAGE 


AND THEN RESUME TESTING 
:SUBSEQUENT RESTARTS WILL NOT TYPE PROGRAM TITLE 


;SWITCH REGISTER OPTIONS 


Sw1S=160000 :=1,HALT ON ERROR 
Sw14=40000 :=1'LOOP ON CURRENT TEST 

SW13= 21; INHIBIT ERROR TYPEOUT 

SWi2=10000 =1'DELETE TYPEOUT/BELL ON ERROR. 

SWi1=4000 t=1’ INHIBIT ITERAT 

$w10=2000 !z1ESCAPE TO NEXT TEST ON ERROR 

SwO9=1 :=1°LOOP WITH CURRENT DATA 

Swog= :=1°LOOP ON E 

SwO7=200 :21,USE CURRENT DMC11 PARAMETERS, =0, aU TQS1ZE OMCL: 
suOb=100 t=]; HALT BEFORE CLOCKING MICRO-PROCESSOR INSTRUC! 
SWO4=20 

SwO3=10 sRESELECT DMC11°S TO BE TESTED (ACTIVE) 

SwOe= :LOCK ON TEST SELECT 

SWOl=2 !RESTART PROGRAM AT SELECTED TEST 

SwOd=! : INPUT DMC11 PARAMETERS 


11:59 PAGE 2 PAGE : 
INTRODUCTION TO DMC11 DIAGNOSCTIC 


0022 
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11:59 PAGE 3 PAGE: 
GENERAL DEFINATIONS AND EQUIVALENCIES 


;REGISTER DEFINITIONS 


Bes EER TINE 


R3=%3 ;GENERAL REGISTER 

RY=% ; RE Tee 

RS=% TER 

SP=% ESSOR K POINTER 
PC=%7 : PROGRAM COUNTER 


PS=177776 ;PROCESSOR STATUS WORD 
STACK=1200 ; START OF PROCESSOR STACK 


eee DEFINITIONS 


PUSH1SP=S746 ;DECREMENT PROCESSOR STACK 1 WORD 
POP 1SP=S7 s INCRENENT, PROCESSOR STACK 1 WORD 


OPRO=12600 RESTORE RO FROM STACK 
PUSH2SP=c4646 sDECREMENT aT Lt 
POP2SP=22626 : INCREMENT STACK TWICE 

-EQUIV EMT,HLT ;BASIC DEFINITION OF ERROR CALL 


;BIT DEFINITIONS 


eee ee eH ee ee ee eH eH ee 


—H nt nt 
—Mrce 
8 


Bee 


0023 


LOe2 
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DZDME.Pil 12-MAY-77 14:18 TRAPCATCHER FOR UNEXPECTED INTERUPTS 


5 RAE ERAA SRR EERE REA ELLE ELLER ELAR RRA AERA SLA ALAA R LALA L ES PELE ETS 





100  henemneenanenene=~9-o=d=9== eG eneEp.. <-UEtaRE-aEyTNNNE Nye 
is LTRRPSPORGRRo’ MYndh* EATER TS PL Bcep 

103 ‘BETWEEN ADDRESS 0 T 

ips ; HTT LOOKS LIKE “PC42 HALT". Pye abe kara re he Co aa, 5. 
te eTIIItittittitiitiiiiiciioiicrre recite tee oir r eels ss ees 
197 

198 000000 .20 

103 : STANDARD INTERRUPT VECTORS 

lll . 

ile 900024 224 

113 po0024 005336 =PrAIL COWS ELS re 

115 : Faro ER 

1 ? oTRPSRY ;SERVICE A LEVEL DISPATCH SERVICE 

Hg SBRRRE BAR eB ETE HPPRE 

120 ooc040 oo0000 ; 9 SAVE FOR ACT- rat 

ish BE AAS IPPPRORRS, TGS FET OF ce 
123 OO000% SENDAD ‘FOR USE WITH peTell “OR XXDP 

153 Bpaaes 252 

185 oo00s2 000000 0 sACT-11 PROGRAM CHARACTERISTICS 

127 900174 2174 

128 900174 Oo0000 OISPREG:0 SOFTWARE DISPLAY REGISTER 

129 000176 o00000 SWREG: 0 ‘SOFTWARE SWITCH REGISTER 

131 o002c00 .=200 

32 oo0200 000137 oo2002 IMP _START GO TO START OF PROGRAM 

134 

135 001000 .21000 

136 gc1599 005377 O40515 O47111 MTITLE: .ASCII <377><12> /MAINDEC-11-DZDMF-B/<377> 

2) O01 104 041515 030461 "ASCIZ /DMC11 BITSTUFF LINE UNIT TESTS/<377> 

\ 

132 001200 .=1200 

139 INDIRECT POINTERS TO SWITCH REGISTER AND LIGHT DISPLAY 

141 : 

142 901200 177570 DISPLAY: 177570 

143 01202 177570 SUR: 177570 


MOe 
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DZDME.P11  12-MAY-77 14:18 PROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS. 

4+ 

iss s INDIRECT POINTERS TO TELETYPE VECTORS AND REGISTERS 

14? . 

148 691204 177560 TKCSR: 177560 : TELETYPE KEYBOARD CONTROL REGISTER 

130 Tt 1 a7eEs u orees PR N RINTER CONTRO PCESTER 

ae 

i 23 crest eee Teese: 177568 TELE INTER SOTA BUFFER 

183 ;PROGRAM CONTROL PARAMETERS 

155 . 

15 001214 RETURN: 0 ;SCOPE ADDRESS FOR LOOP ON TEST 

i O01216 NEXT: 0 ADDRESS OF NEXT xT TEST 10 BE BE EXECUTED 

l Bo t555 TCOUNT: 9 ADDRESS OR OF IT RATIONS penne CURRENT TEST WILL BE 

160 001224 LPCNT: 0 ‘NUMBER OF ITEREATIONS COMPLETED 

161 OOl226 TSTNO: O : R OF TEST IN S 

1be 001230 PASCNT: 0 ; R OF PASSES COMPLETE 

163 OOle32 ERRCNT: 0 ‘TOTAL NUMBER OF ERRORS 

164 001234 LSTERR: 0 :PC OF LAST ERROR CALL 

166 ;PROGRAM VARIABLES 

168 ; 

169 001236 000000 STRTSW: O :SWITCHES AT START OF PROGRAM 

170 o1249 p00000 TAT: : ?DM STATUS WORD STORAGE 

171 1 DOO000L LKX: 

172 001244 900000 MASKX: 0 

173 0012% 9000000 TEMP1: 0 ; TEMPORARY STORAGE 

174 001250 000000 TEMP2: 0 TEMPORARY STORAGE 

17S 001252 900000 TEMP3: 0 TEMPORARY STORAGE 

175 001254 900000 TEMPY: 0 TEMPORARY STORAGE 

177 001256 000000 TEMPS: 0 : TEMPORARY STORAGE 

178 001260 000000 SAVRO: O :RO STORAGE 

179 OOl262 o00000 SAVRI: 0 :R1 STORAGE 

180 001264 900000 SavRe: 0 Re STORAGE 

181 O0l2e66 900000 SAVR3: O ?R3 STORAGE 

182 001270 000000 VR: : :R4Y STORAGE 

183 001272 000000 VRS: *RS STORAGE 

184 001274 900000 Savse: 0 °STACK POINTER STORAGE 

18S 001276 900000 Savec: 0 :PROGRAM COUNTER STORAGE 

186 001300 900000 ZERO: 9 

187 901.30 000001 ONE : 1 

186 O01 000000 MEMLIM: O ;HIGHEST LOCATION FOR NPR'S 

189 101306 000001 DMACTY: .BLKW 1 sDMC LI *S SEL SELECTED RCTIVE. 

190 1319 000001 DMNUM: .BLKW } R OF 1°S. 

191 001312 900001 SAVACT: .BLKW | i oGie Nat ae ACTV vices 

132 «29001314 patel SAVNUM: .BLKW 1 : WORK 

33 001316 RN: 0 ?POINTER TO RUNNING DEVICE. 

195 001320 001472 CREAM: OM. Map ; TABLE POINTER. 

1% 01322 O0le7e MILK: CNT. MAP-4 : TABLE POINTER 


Bsn.) 


aeS5 
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rururufrururururufuru 
+ 0 0 = 0 oh 
WOM NC Wr 


fru 
SREB 


rurururu 
AY) 


MACY (1046) 
Lasmate7 


001342 


001354 


001364 


11-JUL-77 
14:18 


N02 


11:59 PAGE . 
BROGRGR PARAMETERS, VARIABLES, AND TRAP CALLS. PAGE: 0026 


;PROGRAM CONTROL FLAGS 


aU pens ay Pat hia FLAG 


bow: He Oox, Ke On CARR ent lest FLAG 
even SON FIRST PASS OF EACH OMCLL ITERATIONS WILL BE 


;DEFINITIONS FOR TRAP sen he CALLS 
;POINTERS TO SUBROUTINES CAN BE F 
SIN THE TABLE IMMEDIATLY FOLLOWING THE DEFINITIONS 


5 SHEERS SSSSSSLALESE SESS ESASLLLADELESHLRSLLALAALAA ARLES ALE AL ELLE TS SSS 


SCOPES TRAPSO ;CALL TO SCOPE LOOP AND ITERATION HANDLER 
SCOP1=TRAPS1 ;CALL TO LOOP ON CURRENT DATA HANDLER 
TYPE=TRAP+2 ;CALL TO TELETYPE OUTPUT ROUTINE 
INSTR=TRAP SS ;CALL TO ASCII STRING INPUT ROUTINE 
INSTER=TRAP +H ;CALL TO INPUT ERROR HANDLER 
PARAM=TRAP+5 ;CALL TO NUMERICAL DATA INPUT ROUTINE 
SAVOS=TRAP+6 ;CALL TO REGISTER SAVE ROUTINE 
RESOS=TRAP+7 ;CALL TO REGISTER RESTORE ROUTINE 
CONVRT=TRAPS16 ;CALL TO DATA OUTPUT ROUTINE 

CNVRT=TRAP+1 1 ;CALL TO DATA OUTPUT ROUNTINE WITHOUT CR/LF. 
MSTCLR=TRAP+12 ;CALL TO ISUE A MASTER CLEAR 
DELAY=TRAP#13 _ gCALL TO DELAY 

RONCLK=TRAP+14 ;CALL TO CLOCK ROM ONCE 

DATACLK=TRAPS15 ;CALL TO CLK DATA 

TINER=TRAP# 16 ;CALL TO DELAY A CLOCK TICK 


LRERRAERAEEAREREARRARARERERRERERRAPAEEREEREERSEAEE EER ERE REREER ERED REE 
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% ;DMC11 CONTROL INDICATORS FOR CURRENT DMC11 UNDER TEST 

2S0 

251 0013686 000000 STATL: O 

eSe 001370 000000 State: 0 

2 001372 000000 STAT3: 0 

Se :OMC11 VECTOR AND REGISTER INDIRECT POINTERS 

257 ‘ 

2S8 001374 000000 DMRVEC: 0 ;POINTER TO OMC11 RECEIVER INTERRUPT VECTOR 

259 001376 000000 : 0 ‘POINTER TO DMC11 RECEIVER INTERRUPT SERVICE PS 

260 001400 000000 0 ;POINTER TO DMC11 TRANSMITTER INTERRUPT VECT 

2$1 001402 900000 DOMTLVL: 0 :POINTER TO DMC11 TRANSMITTER INTERRUPT SERVICE PS 

2$2 001404 000000 0 sPOINTER TO DMC11 CONTROL STATUS REGISTER 

263 001406 000000 : O ;POINTER TO OMC11 CONTROL STATUS REGISTER HIGH BYTE. 

264 001410 900000 DMCTL: QO :POINTER TO DMC11 CONTOL OUT REGISTER 

265 O0i4le o00000 0 sPOINTER TO DMC11 PORT REGISTER(SEL 4) 

3] 0014i4% go00000 DOMPOB: O : POINTER TO DMC11 PORT REGISTER(SEL 6) 

268 ; TEMP STORAGE 

263 . eoeen<------ 

e70 

271 OO01416 900000 TEMP: 0 

BG 001460 .=. 440 

ve DMC11 STATUS TABLE AND ADDRESS ASSIGNMENTS 

276 

277 001500 .=1500 

278 001500 OM. 

279 001500 000001 DMCROO: .BLKW 1 sCONTROL STATUS REGISTER FOR DMC11 NUMBER OC 

280 001502 o00001 DOMS100: .BLKW 1 :VECT OR FOR DMC11 ~ 

281 001504 o0000: PLKW ol : DOCMP Lincs FOR ORCL NUMBER OC 

cos 001506 000001 DMS30C: .BLKW 1 :3RD STATUS WORD 

284 001510 9000001 DMCRO1: .BLKW 1 sCONTROL STATUS REGISTER FOR OMC11 NUMSER Cl 

285 0015i2 ood001 DMS1O1: .BLKW 1 :VECTOR FOR DMC11 NUMBER O1 

286 001514 000001 1: .BLKW ol ;DOCHE Lines FOR DMC11 NUMBER 0! 

th 001516 000001 DMS301: .BLKW 1 ;3RD STATUS WORD 

289 001520 000001 DMCRO2: .BLKW 1 ;CONTROL STATUS REGISTER FOR OMC11 NUMBER C2 

230 001522 000001 DMS102: .BLKW 1 ‘VECTOR FOR DMC11 NUMBER O2 

291 001524 000001 OMS202: .BLKW 1 :DDCMP LINE® FOR DMC11 NUMBER 02 

3 001526 000001 OMS302e: .BLKW 1 :3RD STATUS WORD 

23 001530 1 OMCRO3: .BLKW 1 3 CONTROL STATUS REGISTER FOR DMC1i NUMBER 03 

295 001S3e 000001 OMS103: .BLKW 1 TOR FOR DMC11 NUMBER 03 

2% 001534 000001 OMS203: .BLKW 1 OBCNP LINE® FOR DMC11 NUMBER 03 

ch 001536 000001 DMS. BLKW ol :3RD STATUS WORD 

233 001540 000001 DMCROY: .BLKW 1 CONTROL STATUS REGISTER FOR DMC11 NUMBER 04 

300 001542 900001 DMSiO4: .BLKW 1 ; VECTOR FOR DMC11 

201 001544 00000) DMS204: .SLKW 1 ;DOCMP LINE® FOR tomer NURSER oY 

2Ce O01S4E 00080) DMS304: .BLKW 1 : 3RD STATUS WORD 


CO3 
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304 901550 000001 DMCROS: .BLKW 1 ;CONTROL STATUS REGISTER FOR DMC11 NUMBER OS 
Gn pom a Bere HE PEA oR Res 
Eu So teee eee OMS30S: :BLKW 1 :3RD STATUS WORD 
309 001560 000001 DMCROS: .BLKW 1 ;CONTROL STATUS REGISTER FOR DMC11 NUMBER 96 
310 001562 000001 DMS106: :BLKW 1 *VECTOR FOR DMC11 NUMBER 06 
311 001564 900001 DMS206: .BLKW 1 :DDCMP LINES FOR DMC11 NUMBER O& 
zig 001566 00000! DMS306: .BLKW 1 39RD STATUS WORD 
314 001570 000001 DMCRO?: .BLKW 1 ;CONTROL STATUS REGISTER FOR DMC11 NUMBER 97 
315 001572 00000! DMS107: .BLKW 1 !VECTOR FOR DMC11 NUMBER 
316 001574 000001 DMS207: .BLKW 1 :DOCMP LINE® FOR DMC11 NUMBER 07 
17 001576 000001 BLKW :3RD STATUS WORD 
319 001600 000001 DMCRIO: .BLKW 1 sCONTROL STATUS REGISTER FOR DMC11 NUMBER 10 
320 001602 900001 OMS110: .BLKW 1 !VECTOR FOR DMC11 NUMBER 19 
321 001604 00000) DMS210: :BLKW 1 :DDOCMP LINE® FOR DMCil NUMBER 10 
22 001606 000001 DMS310: :BLKW 1 :3RD STATUS WORD 
324 001610 000001 DMCRI1: .BLKW 1 ;CONTROL STATUS REGISTER FOR DMC11 NUMBER 11 
325 001612 O00001 OMS111: .BLKW 1 “VECTOR FOR DMC11 NUMBER 11 
326 001614 90000] DMS211: :BLKW 1 : DDCMP LINES FOR DMC11 NUMBER ll 
327 001616 O00001 OMS311: :BLKW 1 :3RD STATUS WORD 
329 001620 000001 DMCRI2: .BLKW 1 ;CONTROL STATUS REGISTER FOR DMC11 NUMBER 12 
330 001622 000001 DMSll2: .BLKW 1 : VECTOR FOR DMC11 NUMBER 12 
331 001624 900001 eo: :BLKW I ?DOCMP LINES FOR DMC11 NUMSER 12 
33 001626 000001 OMS3le: .BLKW 1 :3RD STATUS WORD 
334 001630 o000c1 OMCRI3: .BLKW 1 ;CONTROL STATUS REGISTER FOR DMC11 NUMBER !2 
33S 001632 OC0001 DMS113: :BLKW 1 VECTOR FOR DMC11 R 13 
33% 001634 O00001 OMS213: .BLKW 1 : DDCMP LINES FOR. DMC11 NUMBER 13 
37 001636 000001 OMS313: .BLKW 1 :3RO STATUS WORD 
339 001640 000001 OMCRI4: .BLKW 1 ; CONTROL STATUS REGISTER FOR DMC11 NUMBER 14 
340 O01642 909001 OMS114: .BLKW 1 “VECTOR FOR DMC11 R 14 
341 001644 00000] OMS214: /BLKW 1 !DOCMP LINE® FOR DMC11 NUMSER 14 
a2 001646 0o00001 OMS314: :BLKW 1 :3RD STATUS WORD 
344 001650 900001 DMCRIS: .BLKW 1 sCONTROL STATUS REGISTER FOR DMC1! NUMBER 15 
345 001652 000001 OMS1i5: .BLKW 1 :VECTOR FOR DMC11 R15 
346 001654 00000} DMS215: /BLKW 1 : DDCMP LINES FOR TRC Li NUMBER 15 
347 001656 00000! OMS315: :BLKW 1 :3ROD STATUS WORD 
249 001660 900001 DMCRI6: .BLKW 1 ; CONTROL STATUS REGISTER FOR DMC11 NUMBER 16 
350 O0l662 1 OMS116: .BLKW 1 VECTOR FOR DMC11 NUMBER | 
351 001664 oO00001 OMS2i6: .BLKW 1 :ODCMP LINES FOR tone Li NUMER 16 
se 001666 ! DMS316: :BLKW 1 :3RD STATUS WORD 
354 001670 900001 OMCRI7: .BLKW 1 : CONTROL STATUS REGISTER FOR OMC11 NUMBER 17 
255 001672 000001 OMS117: .@LKW 1 : VECTOR FOR OMC11 NUMBER 17 
356 001674 OCOCO! OMS217: .BLKW :DOCMP LINE® FOR OMC11 NUMSER !7 
#7 001676 00000! OMS317: .BLKW 1 :3RD STATUS WORD 
363 00:79C 900000 DM.END: ocoo00 


DOS 
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60 
36 :DMC11 PASS COUNT AND ERROR COUNT TABLE 
a ew 
ae * 3 
Sec Bot sas Pactoo: o sPASS COUNT FOR DMC11 NUMBER 00 
366 001704 000000 ERCTOO: 0 “ERROR COUNT FOR DMC11 NUMBER OO 
368 001706 O00000 PACTOL: 0 “PASS COUNT FOR DMC11 NUMBER 01 
368 901710 00000 ERCTOI: 0 TERROR COUNT FOR DMC11 NUMBER OJ 
rd 
371 01712 oo0000 PACTO2: 0 sPASS COUNT FOR DMC11 NUMBER 02 
37e 001714 090000 ERCTOS: O SERROR COUNT FOR DMC11 NUMBER G2 
374 001716 o9o0000 PACTO2: 0 :PASS COUNT FOR DMC11 NUMBER 03 
375 001720 o90000 ERCTO3: O TERROR COUNT FOR DMC11 NUMBER 03 
Pd 
377 001722 oo0000 PACTOY: 9 :PASS COUNT FOR DMC11 NUMBER 04 
378 001724 Oo0000 ERCTO4: 0 TERROR COUNT FOR DMC11 NUMBER O04 
4 
380 001726 oog000 PACTOS: 0 sPASS COUNT FOR DMC11 NUMBER OS 
381 001730 00000 ERCTOS: 0 ‘ERROR COUNT FOR DMC11 NUMBER OS 
383 001732 990000 PACTOb: O :PASS COUNT FOR DMC11 NUMBER 06 
34 901734 Oo0000 ERCTOS: O ZERROR COUNT FOR DMC11 NUMBER O& 
386 001736 00000 PACTO?: 0 :PASS COUNT FOR DMC11 NUMBER 07 
387 901740 Oo0000 ERCTO?: O TERROR COUNT FOR DMC11 NUMBER 07 
389 001742 oOD000 PACTIO: 0 :PASS COUNT FOR DMC11 NUMBER 10 
330 001744 Oo0000 ERCTIO: 0 ‘ERROR COUNT FOR DMC11 NUMBER 19 
392 001746 900000 PACT: 0 :PRES COUNT FOR OMCII NUMBER 11, 
393 001780 a00000 ERCTII: O SERROR COUNT FOR DMC11 NUMBER I 
395 001752 oo0000 PACTI2: 0 :PASS COUNT FOR DMC11 NUMBER 12 
39 901784 900000 ERCTIo: 0 TERROR COUNT FOR DMC11 NUMBER 12 
398 001756 ooD000 PACTI3: 0 :PASS COUNT FOR DMC11 NUMBER ! 
398 001760 000000 ERCTI3: C TERROR COUNT FOR DMGd1 NUMBER. 73 
401 001762 oo0000 PACTI4: 0 :PASS COUNT FOR DNC11 NUMBER 14 
#02 001764 900000 ERCTIY4: 0 TERROR COUNT FOR DMC11 NUMBER 14 
404 001766 00000 PACTIS: 0 :PASS COUNT FOR DMC11 NUMBER 1S 
405 901770 00000 ERCTIS: 0 TERROR COUNT FOR DMC11 NUMBER 15 
407 901772 oonogD PACTI6: 2 :PASS COUNT FOR DMC11 NUMBER 16 
493 901774 coonod ERCTIB: O ‘ERROR COUNT FOR DMC11 NUMBER i6 
419 90177 ogo009 PACTI7: 9 :PASS COUNT FOR ONCII NUMBER. 17_ 
41: 802000 S00000 ERCTI?: 0 TERROR COUNT FOR DMC1! NUMSER 
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FORMAT OF STATUS TABLE 


1§ 14 13 le 11 10 O09 O08 O7 0&8 OS OY O3 Ce O1 OO 


I I 
t Oe Me oe oe oe Pe Me PS SS PE ‘ CSR 


wwe oe ewe eo meme em em ee em ew eee eee ee eee eee ee ee ee eee ee ewe e ee wee ee eee eee reese 


I I I 
: e B68 A A 0.0. & ' sn Pe Oe ee s # : STAT2 


ey wee) Re AP Bt Oe Oy as tee fe OP oe: ee 
cau Bi now “een £2 fy eee eee aes STATS 
a2: or eo CB or SO Ae ee ee es ee ee ee 


CSR: CONTAINS DMC11 CSR ADDRESS 
TATI: S 00-08 IS DMC11 VECTOR "Rar 


UND CORE STOR IS ON 
CONNECT 

UNIT IS AN NBEO 

UN AN M8202 


44H AHHH 
MWWtcCuU 
ounnnnun 


US) bb be he ee 
pr OO-OG 


BI 
BI 
BI 
BI 
BI 
BI 
BI 
BI 
BI 
LO 


WW BYTE IS SWITCH PAC#1 (DDOCMP LINE NUMGSER) 
HIGH BYTE IS SWITCH PAC#2 (BM873 BOOT ADD: 


STATS: OITOsl O00 FREE RUNNING TESTS on KMC 
(MUS SE ONE MANUALLY [PROGRAM DZDMI ONLY?) 
eds U HAVE nae WRITTEN FROM RUNNING 


STAT2: 


TEST 2 F 
BITi=1 OMCLi-AL LOCAL HIGH SPEED MICRO-CODE 
Bitiso DMCLI-AR REMCTE LOW SPEED MICRO-CODE 


PAGE: 


0036 


FOS 
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468 

463 :PROGRAM INITIALIZATION 

vat LOOK OUT nee Stack 

4? i aEt UP PRLeR Pet oy VECTOR 

473 : CLEAR PROGRAM CONTROL FLAGS AND COUNTS 

4 :TYPE TITLE MESSAGE 

476 002002 0612737 O00340 177776 .START: MOV : LOCK OUT INTERRUPTS 

477 002010 012706 001200 MOV eerneke SP TACK 

478 002014 012737 005336 co00e4 MOV #.PFAIL. 2824 ‘aE UP POWER FAIL VECTOR 

479 002022 013737 001310 601314 MOV DMNUM,SAVNUM § :SAVE NUMBER OF DEVICES IN SYSTEM. 

480 002030 005037 010016 CLR SWFLG :CLEAR SOFT TYPEQUT 

481 002034 105037 001325 CLR8 = ERRFLG i CLEAR ERROR FLAG 

482 o0e040 1 001327 CLRB=ss«QV..FLG :2ERO QUICK VERIFY FLAG 

483 002044 012737 001470 001320 MOV #0M.MAP-10,CREAM:GET MAP POINTER. 

484 O0020S2 012737 001676 001322 MOV #CNT.MAP-4'MILK :GET PASS COUNT MAP POINTER 

485 002060 012737 100000 001316 MOV #B1T1S. RUN ;POINT POINTER TO FIRST DEVICE. 

486 002066 Ole700 00170e MOV aCNT. MAP, RO :PASS COUNT POINTER TO RO 

487 002072 005020 233: CLR (RO)+ TABLE 

488 002074 O22700 002002 CMP #CNT. MAP+100,RO : DONE YET? 

489 002100 001374 BNE 23% *KEEP GOING 

490 002102 005037 001234 CLR LSTERR :CLEAR LAST ERROR POINTER 

491 002106 012737 000001 001226 MOV #1, TSTNO ‘SET UP T 1 

#3e 002114 012737 OO02002 O01214 MOY #. START, RETURN set FOR ab QuER FAIL BEFORE 

494 002122 0137% 000006 MOV 386, -(SP) :SAVE CURRENT VECTORS 

495 002126 013746 O00004 MOV ae4’ -(SP) : 

496 002132 012737 002166 OO0004 MOV #63. 084 ;SET UP FOR TIMEOUT 

497 002140 012737 177570 OOled2 MOV #177570, SWR :SET SWR TO HARD SWR ADDRESS 

498 002146 012737 177570 001200 MOV #177570 DISPLAY !SET DISPLAY TO HARD SWR ADDRESS 

499 002154 022777 177777 177020 CMP 8-1, aSWR ;REFER ENCE HARDWARE SWITCH REGISTER 

500 002162 001402 BEQ 6$+2 ;1F 2-1 USE SOFT SWR ANYWAY De 

501 O02164 000407 BR 7§ IF IT EXISTS AND NOT = -1 USE HARD Su 

S02 002166 6$: CMP (SP)+, (SP)+ : ADJUST STACK 

503 002170 012737 OO0176 cO!2ce MOV aSWREG SW :POINTER TO SOFT SWR 

504 002176 O1e737 000174 OOle00 MOV BDISPREG DISPLAY:POINTER TO SOFT DISPLAY REG 

50s 012637 900004 7$: MOV (SP)+, 084 ;RESTORE VECTORS 

506 002210 012637 O00006 MOV (SP)+' aee 

507 002214 105737 001324 TSTB ~—sCINIFLG ‘HAS INITIALIZATION BEEN PERFORMED 

508 002220 001006 BNE 20$ -BR IF YES 

509 022737 003522 on0042 CMP SSENDAD,a842 :IF ACT-11 AUTOMATIC MODE, DON'T TYPE IC 

510 002230 Oo0140e2 BEQ 20$ 

E11 104402 001000 TYPE MTITLE s TYPE TITLE MESSAGE 

Sie 36 004737 007606 208: ISR C, CKSWR :C FOR SOFT SWR 

513 O0e242 017737 176734 001236 MOV asi, STRTSH RE STARTING SWITCHES 

514 002250 005737 ooD04e2 TST 284, IS IT Ru RUNNING IN AUTO MODE? 

515 002254 00140 BEG ae H 

S16 O0e256 005037 001236 CLR STRTSW : IF teoN CLEAR SWITCHES 

517 O0e2b2 000901 o0123¢ BIT aSWOC, STRTSW :IF SWOO=1, QUESTIONS ARE ASKED. 

c18 001012 BNE 17$ :BR IF Saa=1 

519 72 001236 TSTB baru :BIT?=1?? 

520 002276 100007 SPL 17 :BR IF SWO7=0 

E21 002200 005737 001306 TST AmacTY :ARE ANY DEVICES SELECTED” 

See 002304 00100 BNE 16$ :BR IF YES 

S23 002206 194402 907154 TYPE, NORCT = NO DEVICES SELECTES. 


GOs 
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S24 992 12 000000 HALT :STOP THE SHOW 
14 000776 BR .-2 {DISQUALIEY CONTINUE SWITCH 

526 002316 004737 010512 17: JSR PC AUTO. SIZE :G0 DO THE AUTO SIZE 
Se? O0e322 105737 001324 168: TSTB ~—s INT FLG a 
528 002326 001410 BEQ 21$ BR IF YES 
S29 002330 105737 001236 TSTB = STRTSW LIF USING SAME PARAMETERS DONT TYPE Mar 
530 002334 100431 BMI 1$ 
531 000336 032737 000006 901236 BIT e171! BIT2, STRTSW: IS TEST NO. OR LOCK SELECTED 
S32 002344 001403 BEQ 24§ :tF NO THEN TYPE STATU 
533 002346 O00424 BR 1$ : IF YES DO NOT TYPE STATUS 
534 137 001324 21$ COM INIFLG ;SET F LAG 
53S 002354 104402 24 ous TYPE x ‘TYPE HEADER 
536 O02 012704 001590 MOV kOM. MAP, RY :SET POINTER 
537 002364 010437 001246 $: MOV R4, TEMP : SET 
538 002370 012437 001250 MOV (R4)+, TEMP2 -SET C 
539 002374 OO1411 BEQ 1$ !ALL DONE IF ZERO 
540 002376 012437 001252 MOV (R4) +, TEMPS :SET STATI 
541 O0e402 012437 001254 MOV (R4)+° TEMPY : SET State 
S42 000406 012437 001256 MOV (R4) +; TEMPS :SET STATS 
543 O0e412 104410 CONVRT ‘TYPE OUT STATUS MAP 
S44 000414 007454 XSTATO : 
S4S 002416 000762 BR S$ 
ie 002420 912705 oo1s00 1S: MOV #0M. MAP, RO :RO POINTS TO STATUS TABLE 
c4e 5 RESRARERAAASALELLAAE SALE RARE FLALALEL SRE LALA AEA AELHLALARELALA LALA LLSAS 
Sus AUTO SIZE TEST : 
$50 ::a#THIS TEST VERIFYS THAT THE PP baie tes OR. KMCLIS ARE a, THE comme PORT IG 
| 
3 HECK the “poDRESSES OF ALL FLOR Rc DEVIC ES (bY. DH Bo'bu BU, Bub LX ORC, Dz 
553 *IF ARE NO OTHER FLOATING S BEFORE te onclt FIRST 3 
554 tt cli ABORE 760070, KMC11 3 VEEP . NO DEVICE P SHOULD EER 
sés sone S 760000. THIS TEST MAY REQ MORE ATTEMPTS To CET rhe 
sce 2 #RT TER YOU HAVE C 
5o7 ::#YOU THE FIRST TIME, IT MAY CO K TELL YOU A ON EEERENT “adores 
coe ::#THE NEXT TIME YOU RUN IT. PLEASE HAVE PATIENCE, THE FI 
3) ic: a (AS LONG AS ALL DEVICES IN FRONT OF THE DMC’S AR 
S61 : 5 ERERRERHSLAAAALARELSL LAA SAALAASLAALALAEREALERLRELLALASFAASSAELARASTE 
563 002424 013746 op0004 MOV ae4,-(SP) :SAVE LOC 4 
564 002430 01374 o00006 MOV a86, -(5P) :SAVE LOC & 
565 002434 005027 O00006 CLR 386" :CLEAR VEC+2 

002440 005037 001252 SLR TEMPS :CLEAR FLAG 
567 002444 O0S005 CLR RS ;RS=O=DMC, RS=-1=KMC 

002446 011037 001404 AUSTRT: MOV (RO) ,OMCSR :GET NEXT DMC CSR 
569 002452 001564 BEQ AUDONE :BR IF DONE 
70 o024S4 705 TST ;DMC OR HC? 
71 002456 001005 ONE 13 :BR IF K 
S72 O00e%60 032760 100000 osc002 BIT #BITIS,2(RO) : CHECK OR onc CSR 
573 002466 001061 BNE SKIP : SKIP IF NOT D 
574 000470 O00404 BR 2g :ITS A DMC SO CONTINUE 
S75 002472 032760 100000 ocoDne 1S: BIT #8IT1S,2(R0) : CHECK FOR KMC “es 
576 O02S00 001454 BEQ SKIP SKIP IF NOT K 
677 02502 O1737 002674 900004 2$: MOV BNODEY, 84 SET UP FOR. TIMEOUT 
E7e 002510 705 TST RS :DMC O 


$73 O0eSie 901003 BNE 3$ :B8 F KN 


De 


580 
$81 


608 


0+ b= bb 2 bbe be ee 
‘DM NOU Lh wD 


MOOK OONM OOO or 


SRO PE RES 


o Clk 
tet ol 


(otto 
ES 


002514 


DIOMF =MACYLI we 


cOME.P11 12-MA 


012703 
0004 


000402 


l1-JUL-77 
4:18 


000006 


jet 
00301 
16001 


002700 
003022 
100000 


100000 


001404 
000010 


000010 
001404 
1 
00818 
001404 
003022 


001252 


002700 


77777 
1262 


ocooo% 


000982 


o0cd0e 


00302e 


001276 


001252 


11:59 


HOS 


PAGE 13 
PROGRAM INITIALIZATION AND START UP. 
MOV ag, R3 
BR 
33: MOV 
tf MOV Hee Re 
FLOAT rey 
L : 
nove (el) RY 
ADD RY RI 
iN R1 
I RY, Rl 
ie 
MOV FLoar ae4 
MOV R1,XLOC 
FY: TST ° 
BM dBrris.ecro) 
BNE SKIP 
BR 2g 
1g BIT sBIT1S,2(RO) 
BEQ SKIP 
2$: TST (RI) 
CMP R1,DMCSR 
BEQ OK 
ADD #10,R1 
BR FY 
SKIP: ADD #10,RO 
MOV poe 
BEG AUDO 
OK Q 4 
ab +19, 80 
MOV (RO 5 BRCSR 
BEQ Done 
HOV moc 1 
NODE: cnPe (Reds, -(R3) 
ERR: TST TEMP3 
BNE 1$ 
TYPE 
CONERR i 
MOV BERR, SAVPC 
CNVRT 
ERRPC 
YPE 
CNERR 
MOV 8-1, TEMPS 
1S: MOV R1,SAYRI 
CONVRT 
CONTAB 
TST RS 
ONE 33 
TYPE 
OMCM 
oF 4 


by, i COUNT OF DEVICES PEFORE ONC 


Te GRU gE BF oe 
oF ed TRB et ADORESS 


a MORE DEVICES TO CHECK FOR? 
: MC’S ARE LEFT ser UP FOR TIMESUT 
SAVE ETRST OMC/KMC ADDRES 

mc OR KMC? 


Hy ve. CSR 


YES 
Be en one ADDRESS 
; SKIP TO 7 hae CSR IN TABLE 
NEXT CSR 


TINUE 
a ESE RE SF en ACDRESS 


‘BR IF 
:GET E oF DMC/KMC ADDRESS 
‘ON TIMEGUT, INC Re, DEC R3 


; RETURN 
:CHECK FLAG IF = 0 TYPE HEADERS 
: i our \enOr 
;Ty® MESSAGE 
LORE CURA TON TERR 333% 
VE PC_FOR TYPEOUT 


:SA 
; TYPE OUT ERROR PC 
: TYPE REST OF HEADER 


SET FLAG T ONLY GE 
: SAVE Ri BR typEout 
; TYPE CSR VALUES 

OMC OR KMC ” 


;BR IF KMC 


we WE 


SETS TYPED 


: CONTINUE 


10s 
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636 002760 104402 38: TYPE 

637 O02 007330 KMCM 

638 002764 022626 8 4§: CHP {SP)+, (SP)+ sBDJUST STACK 

Pag Need 1 ERRPC: 1 

641 002772 006 002 -BYTE 6,2 

S42 002774 001276 SAVPC 

643 002776 o00002 CONTAB: 2 

644 003000 006 004 -BYTE 6,4 

645 003002 003022 XLOC 

646 003004 006 002 .BYTE 6,2 

647 003006 001404 DMCSR 

648 003010 007 DEVTAB: .BYTE 7 :DJ 

649 003011 017 ‘BYTE 17 : DH 

650 003012 007 ‘BYTE ? :DG 

651 003013 007 BYTE 7 OU 

b52 14 007 BYTE 7 : DUP 

653 003015 007 BYTE 7 LK 

654 003016 007 BYTE 7 : MC 

655 003017 007 BYTE 7 02 

656 003020 007 BYTE 7 :KMC 

657 003022 EVEN 

003022 900000 XLOC 

659 002024 005705 AUDONE: TST RS DMC 

660 003026 001005 BNE 1$ : BR IF KM AND ALL Done 

661 003030 012705 177777 MOV #-1,R5 :SET RS TO -1 (K 

bbe 003934 012700 00150c NOV gOM. NAP, RO sRESET RO 1 TO 1 TART oF TABLE 

664 nent poe ss ooocos 1S: MOV METS oe Bt oe ; 

655 00304 012637 00004 MOV (SP)+'ae4 “RESTORE LOC 4 

666 0030S2 032737 OOD0I0 001236 BIT #803, *STRTSW ir SPECIFIC DEVICES”? 

667 003060 001422 BEQ :BR FN 

68 003062 104402 006144 TYPE aftne ghia Bu 

£90 003070 1 Baty Pon USE ae i] TELL WHAT DEVICES TO ALA 

71 003072 027737 176104 001212 CMP ISWR, SAVACT :1S THE NUMBE 

&7e 003100 101404 LoS) aS BR IF NUMBER Re bk 

673 002102 iG4402 oD600S YPE § , MERR3 :TELL USER OF INVALID NUMBER. 

674 003106 HALT STOP EVERY HING. 

675 003110 000776 BR .-2 RESTART AGAIN. 

676 003112 017737 176064 001306 2s: MOV aSWR, OMACTY GET NEW OEYICE PATTERN 

677 003120 013700 001306 MOY DMac ty, RO :SHOW THE USER ag SELECTED. 

678 003124 HALT Baer DYNAMIC SuITC 

679 003126 012700 000309 2S: MOV #300, RO AR THE EEF ING 

680 003132 012701 000302 MOV $302. R1 ‘VECTOR AREA. 76 

681 003136 010120 4$: MOV Rl (RO)+ :START PUTTING "PC+2 - HALT” 

682 003140 O0S021 CLR (Ri)+ ‘IN VECTOR AREA. 

683 003142 Oe20e!1 CMP (RO)+, (RL)+ : POP POINTERS 

684 003144 022700 oo1000 CMP #1000:RO :ALL DONE?? 

bs 003150 00137 BNE 4§ :BR IF NO. 

$87 ;TEST START AND RESTART 

Pes por r mere ner er senrennnn- 

699 002152 012706 oO1200 -BEGIN: MOV aSTACK, SP :SET UP STACK 

691 O0215€ 013746 dC000€ MOV dab, -( SP. :SAVE LOC & 
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2 Bs a 


003354 
903360 
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000004 
003234 
000006 


1S7776 


005°°SS 
175630 


000004 


177776 
001236 


003612 
003614 


eentate 


001214 
001e36 
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FAGE: 0035 


PROGRAM INITIALIZATION AND START UP. 


6$: 


2$: 


10$: 


3$: 
4§: 


pies 
#ce$,a84 
ae 


(R 
#157776,R0 


BR IF NO 
SAVE 2K FOR MONITORS 
RO, MEMLIM STORE MEMORY LI 
(SP)+, 084 :RESTORE LOC 4 
(SP)+' dae ; RESTORE LOC 6 


l ; 
oe (SP)+ ;ADJUST STACK 
;GET LAST GOOD ADDRESS 


ere RQ. “SAVE 2K FOR MONITORS 
#30000, R :1S IT 8k? 

;BR IF NO 
#37400, RO :IF BK DON’T SAVE 2k 


#340, PS !LOCK OUT INTERRUPTS 
WBIT2,STRTSW CHECK FOR LOCK ON TEST 
3 BR ck 

MLOCK : LOCK SELECTED. 
#NOP, TTST ‘ADJUST SCOPE ROUTINE 
NOP, TT§T+2 SET UP TO at OC 


an Tete2 TOE noah ray” SCOPE 24 UP Bice Wer to tect LOOF 


aCYCLE. RETURN  :START ar *CYCLE™ FIND WHICH DEV? 
8SWO1, STRTSW i1s TEST NO. SELECTED? 


MR : ,f 
SRETURN “START TESTING 


KQ3 
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DZDME.P11 12-MAY-77 14:18 END OF PASS ROUTINE 

88 Wee “hat <2 Test 

; BEEGK, FOR elt 70 ACTo1L 

$37 003364 000005 .EOP: RESET MAKE THE WORLD CLEAN AGAIN 

732 003366 005037 001234 CLR aie ia AR LAST ERROR PC 

bai BOSE AGeS> DBisSS | thee = Bach? say PATE, Pass CUNT 

oae Boats Adaas BpaSsg 175570 Hope | PapenageOrSPLAY os Baeg ON 

737 003414 104402 006072 TYPE | MCSRX 

? 1 CNVRT ,XCSR 

3 fies ieee BRio8 i aS Heo 

74 4 CNVRT ({X ee 

741 003434 104402 006106 TYPE , MPASSX : TYPE PASSES 

ois Spada t FYE’ RE RAS i TBE Errors 

104411 70 CNVRT °XE i : 

RS ies We BPs BHP. SPE RH 
1 6 + } 

8 or Bit ms 00132 MOVB 577, 0V.F FLG SET Te replace 
7 7 8 

oe4 l2 Ot 338; Bp aaaS aaoeds HOV atic * eange: a ACT-11 OR DOP 

753 003516 001406 BEG STRT IF NOT, CONTINUE TESTING 

754 003520 900005 RESET DT He” SHOW--CLEAR THE WORLD 

755 003522 SENDAD: 

756 003522 004711 JSR PC, (RL) 

757 003524 00240 NOP 

758 003526 000240 NOP 

759 003530 c00°40 

760 003532 000040 NOP 

761 003534 012737 O10060 o01214 RESTRT: MOV SCYCLE, RETURN 

762 003542 000137 510060 MP CYCLE 

oes han ToC fae a 

765 903552 001404 DMCSR 

766 003554 000001 XVEC: 1 

767 0023556 004 o02 -BYTE 4,2 

768 002560 001374 ee DMRVEC 

770 O34 Obs oe Wee, et 

771 003566 001230 PASCNT 

ee ae aes 

rn 003574 001232 ERRCNT 

Hs :SCOPE LOOP ONO INTERATION HANDLER 

Mh: 003576 004727 O07EDE .SCOPE: JSR PC, CKSUR s KECK FOR SOFT Swk 

78D 003602 Siocle MOV RO,(S AYE RO ON THE STACK 


LOS 
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781 003604 032777 O40000 175370 BIT #BIT14, ISWR "LOOP ON THIS TEST”? 

782 003612 001407 TTST: BEQ 1$ ‘BR IF NO. (IF LOCK SWOl=1; THIS LOC =249) 
783 14 000437 BR 3$ :GOTO 3$ (IF LOCK SWOl=!: THIS LOC =240) 
784 003616 005737 003734 TST DONE :WAS TKCSR DONE SET? 

78S 003622 001434 BEQ 3$ :BR IF NO (LOCKED ON TEST) 

786 003624 005037 003734 CLR DONE ; YES BR FLAG 

787 003630 O00415 BR 2$ :G0 TO NEXT TEST 

788 004000 175342 1$: BIT 8SW11, ISWR sDELETE ITERATION? (QUICK PASS) 
789 ee 001011 BNE 2$ YE 

790 003642 105737 001327 TSTB = QV. FLG PASSES S BEECOMPLETED” 

791 O0036% 0014 BEQ 23 ‘BR F QUICK PAS 

792 003650 005237 001224 INC LPCNT : UPDATE ITERATION COUNTER 

793 003654 023737 001224 001222 CMP LPCNT,ICOUNT :ARE ALL ITERATIONS DONE?” 

794% 003662 101414 BLOS 3% :BR IF NOT YET 

79S 003664 105037 001325 2s: CLRB = ERRFLG :PREPARE FOR NEW TEST 

7% 003670 005037 001224 CLR LPCNT :START ICOUNTER AT 0 

797 003674 005037 001220 CLR LOCK 

798 012737 b00Ge0 001222 MOV #20, ICOUNT :RESET ITERATIONS 

799 003706 013737 OOl2l6 001214 MOV NEXT, RETURN ;GET NEXT TEST 

800 003714 011600 3S: MOV (SP), RO :POP RO OFF OF THE STACK 

801 003716 Oeb26 POP2SP !FAKE AN “RTI™ 

B02 003720 013701 001404 MOV DMCSR, R1 :R1 CONTAINS BASE DMC ADDRESS 

3 77 175264 IMP ORETURN :G0 DO THE TEST 

1407 BRW: 1407 

80s 000437 BRX: 437 
806 003734 DONE: 0 

ens ;CHECK FOR FREEZE ON CURRENT DATA 

810 ‘ 

811 003736 004737 007606 .SCOP1: JSR PC, CKSWR ;CHECK FOR SOFT SWR 

812 003742 032777 O01000 175232 BIT #Si09, JSWR 1S SWO9=1(SET)? 

813 003750 001405 BEQ 1$ :BR IF NOT SET. 
814 003752 005737 001220 TST LOCK 
81S 003756 001402 BEQ 1$ : 
816 003760 013716 o01220 MOV LOCK, (SP) :GOTO THE ADDRESS IN LOCK 
B17 003764 900002 1$: RTI :G0 BACK. 
el : TELETYPE OUTPUT ROUTINE 

821 j 

822 003766 O10S46 .TYPE: MOV RS,-(SP) ;SAVE RS ON THE STACK. 

823 003770 017605 o00002 MOV a2tsP) Rs ‘GET ADDRESS OF MESSAGE 

824 003774 062766 O00002 o0000e ADD #2,2(SP) :POP OVER ; 

825 O04002 005737 O10016 4S: TST SWFLG :SOFT SWR MES 

826 004006 001004 BNE 1$ :IF YES TYPE IT out oREGAROLESS OF SWZ 
827 OO4010 032777 O10000 175164 BIT #SW12, ISWR ‘INHIBIT ALL PRINT 

828 OO4016 001012 BNE 3$ :BR IF NO PRINT gut OUANTED {suizs 1} 
B23 904020 105715 1S: TSTB ss (RS) :IS NUMBER MINUS? (MSB=1 (BIT? 

830 OO04022 100002 BPL 2$ :BR IF NUMBER IS PL 

831 OO40e4% 104402 005672 TYPE MCRLF : TYPE A CR/LF! 

832 004030 105777 175154 2s: TSTB aTPCSR :TTY READY? 

833 004034 100375 BPL 2$ :BR IF NO. 

834 OO4036 112577 175150 MOVB  (RS)+,aTPOBR #§ ;PRINT CURRENT CHAR. 

835 904042 001357 BNE 4 :IF NOT ZERO KEEP PRINTING! 

836 OO4O44 012605 3S: MOY (SP)+,R5 :END OF OUTPUT. RESTORE RS 


MO3 
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337 00404 000002 RTI :GO HOME 
939 j 
840 OO40SO 010346 . INSTR: MOV R3,-(SP) ;SAVE R3 ON STACK 
841 O040S2 O10446 MOV R4’-(SP) :SAVE RY ON STACK 
842 OO040S4 017637 O00004 004072 MOV a4tSP), .MSG 
843 004062 062766 000002 O00004 ADD #2,4(SP) 
844 004070 104402 -INST1: TYPE 
84S 004072 MSG: 0 
846 004074 012704 007502 MOV #INBUF ,R4 
847 004100 012703 000007 MOV #7,R3 
848 004104 105777 175074 1S: TSTB  aTKCSR 
849 004110 100375 BPL 1$ 
850 OO4112 117714 175070 MOVB  JTKDBR, (R4) 
851 OO4116 1427!4 O00200 BICB #200, (RY) 
8Se OO4l22 122427 000015 CMPB (R4)4. #15 
853 004126 001417 BEQ INSTR 
8S4 004130 105777 175054 2$: TSTB = ATPCSR 
855 004134 100375 BPL 2$ 
856 004136 017777 175044 175046 MOV JTKDBR, JTPDBR 
857 004144 005303 DEC R3 
858 OO4146 001356 1$ 
859 OO41SO 012604 MOV (SP)+.R4 
860 004152 012603 MOV (SP)+°R3 
861 OO41S4Y 104402 oDsE6E -INSTE: TYPE MQM 
862 OO4160 010346 MOV R3,-(SP) 
863 OO4162 O10446 MOV RY’ -(SP) 
B64 OO4164 000741 3 INSTI 
865 OO4166 012604 INSTR: MOV (SP)+,R4 :RESTORE RY 
866 004170 012603 MOV (SP)+/R3 RESTORE R3 
B67 004172 oo00de RTI 
869 ;CONVERT ASCII STRING TO OCTAL 
871 ? 
972 OO4174 OL10S4E .PARAM: MOV RS,-(SP) 
873 004176 O10446 MOV R4’-(SP) 
874 904200 O16608 MOV 4(5P), 
875 OO04204 Ol 004364 MOV (RS) +> LOLIM 
876 OO04210 012537 366 MOV (RS)+,HILIM 
877 214 012537 370 MOV (RS) +, DEVADR 
a8 112537 004372 MOVB (RS)+,LOBITS 
24 ii 004373 MOVE _— (RS) + ADRCNT 

880 OO04230 O10S66 000004 MOV RS,4(5P) 
881 O04234 O0S00S PARAMI: CLR RS 
B82 004236 012704 007502 MOV sINBUF , RY 
883 O04 122714 o000015 CMPB 81S. (R4) 
884 001420 BEG PARERR 
88S 004250 121427 000060 1S: CMPB 3 s«CR4#) , WED 
B86 004254 002415 BLT PARERR 

004256 121427 000067 CMPB sé R44), 867 
888 OO04262 003012 BGT PARER 
889 O04264 142714 oOD0060 BICB  =—s-_- #60, (RY) 
890 004270 152405 BISB (RUS+ RS 
891 004272 122714 oD00015 CMPB sa 1 5, (RY) 
S92 004276 O0140e Limits 


NOS 
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DIDME.P11 GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC) 
893 O04 ASL R 
SBR Re e & 
age 304 006305 ASL RS 
89% 004306 000760 ge 
897 004310 104404 PARERR: INSTER 
838 004312 000750 BF 
300 : TEST TO SEE IF NUMBER IS WITHIN LIMITS 
302 : 
803 004314 020537 004366 LIMITS: CMP RS, HILIM 
3904 004320 101373 BHI PARERR 
30S 004322 020537 004364 CMP RS, LOLIM 
906 004326 103770 BLO PARERR 
907 004330 133705 004372 BITB LOBITS,RS 
308 004334 001365 BNE PARERR 
310 ;STORE NUMBER AT SPECIFIED ADDRESS 
912 004336 013704 004370 MOV DEVADR, R4 
oe sg See 
315 004350 105337 004373 DECB ADRCN 
916 004354 001372 BNE 1$ 
917 O043S6 012604 MOV (SP)+,R4 
918 004360 012605 MOV (SP)4°RS 
919 004362 d00002 RTI 
$20 004364 000000 LOLIM: 90 
921 004366 900000 HILIM: OQ 
922 004370 o00000 DEVADR: 0 
$23 004372 000000 LOBITS: 0 
4 004373 ADRCNT=LOBITS+1 
328 ySAVE PC OF TEST THAT FAILED AND RO-RS 
928 ; 
323 004374 016637 O00004 001276 .SAVOS: MOV 4 (SP), SAVPC sSAVE R7 (PC) 
331 ;SAVE RO-RS 
$33 oo4402 010537 001272 SvOS: MOV RS, SAVRS :SAVE RS 
934 004406 010437 001270 MOV RY’ SAVRY :SAVE RS 
aac DOWIE ioe? | potoeS MOY ORB SAVES OVE Re 
a3 OO44e2 010137 O01 MOV RI; SAVRI :SAVE RI 
» 938 OO4426 010037 001260 MOV : SAVE RO 
333 004432 900002 RTI LEAVE 
Fall ;RESTORE RO-RS 
943 34 j : MOV VRO, RESTORE RO 
Si SBN RLY Bisse mesos: poy SER SRESTORE 
Sue goss O13709 botSee MOV SAVERS RESTORE 3 
aap 004454 pte 001270 MOV SAVRY’ RY RESTORE RY 
948 OO4460 013705 001272 MOY SAVRS. RS RESTORE RS 
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943 cO44e4 o00002 
950 
951 
952 
983 - 
954 OO4WGE 104402 005672 
955 004472 O10046 
956 OOW74 O10146 
957 OO4476 010346 
958 O04S00 O10446 
969 04502 O10S46 
960 OO4SO4 017601 00012 
961 004510 062766 p00012 
%2 004516 Olel37 004710 
93 004522 112137 004712 
94 004506 112137 004713 
95 004532 013137 004714 
96 004536 122737 000003 004712 
967 004544 001003 
968 004546 042737 177400 004714 
23 OINSSH 013704 O0N714 
S71 OoNses 12700 BOlsi6 
972 004570 010403 
973 004572 042703 177770 
974 004576 062703 000060 
975 Oo4e02 110320 
976 OO4604 000241 
977 OO4605 006004 
978 004610 O00241 
979 004612 006004 
980 004614 000241 
981 004616 06004 
982 004620 005305 
983 O04622 001362 
964 004624 012703 007544 
985 004630 114023 
986 004632 105337 904712 
987 004636 001374 
988 OO4640 105737 004713 
$89 OO4644 001405 
990 0464 112723 O00040 
991 OO46S2 105337 004713 
992 004656 001373 
993 004660 105013 
994 OO4662 104402 007544 
995 004666 005337 004710 
9% 004672 001313 
997 004674 012605 
998 004676 012604 
999 004700 012602 
1900 04702 012601 
Be ee 
1963 904719 ogoood 
i504 04712 oo000c 


:$9 
2 SGENERAL STILITIES (TYPEOUT, ERROP, SCOPE, ETC) 


RTI 


BO4 


s LEAVE 


;CONVERT OCTAL NUMBER TO ASCII AND OUTPUT TO TELEPRINTER 


.CONVR: TYPE 
.CNVRT: MOV 


1S: MOVE 


23: 


3s: MOV 


4$: MOVB 


Ss: MOVB 


6$: CLRB 
YP 


WROCNT: QO 
CHRCNT: 0 


RY 


POGE: 


0046 


CO4 
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1005 004713 SPACNT=CHRCNT+1 
1908 004714 900000 BINWRD: 0 
1908 
1009 ; TRAP DISPATCH SERVICE 
1019 ! ARGUMENT OF TRAP IS EXTRACTED 
1011 AND USED AS OFFSET TO OBTAIN POINTER 
idle :TO SELECTED SUBROUTINE 
1014 OO4716 011646 .TRPSR: MOV (SP). -(SP) :GET PC OF RETURN 
1015 004720 162716 000002 SUB #2, (SP) :=PC OF TRAP 
1016 OO4724 017616 000000 MOV a(SP), (SP) GET TRP 
1017 004730 006316 TRPOK: ASL (SP) ‘MULTIPLY TRAP ARG BY 2 
1018 OO4 042716 177001 BIC #177001, (SP) “CLEAR UNWANTED BITS 
1019 OO4736 062716 001330 ADD 8. TRPTAB, (SP) ;POINTER TO SUBROUTINE ADDRESS 
1920 OO4742 017616 MOV a(SP), (SP) SUBROUTINE ADDRESS 
Gel 004 000136 IMP a(SP)4 :60 TO SUBROUTINE 
1023 : ERROR HANDLER 
ae a Rape 
1026 004750 004737 007606 -HLT: JSR PC, CKSWR ;CHECK FOR SOFT SWR 
1027 004754 032777 010000 174220 BIT #SW12, aSWR :BELL ON ERROR? 
1028 004762 001406 BEQ x :BR IF NO BELL 
1929 904764 105777 174220 TSTB  aTPCSR :TTY READY. 
1030 004770 100003 BPL XBX !DON’T WAIT IF TTY NOT READY. 
1031 004772 112777 oO00207 174212 MOVB 8207, aTPDBR :PUSH A BELL AT THE TTY. 
i032 OOSO000 030777 O20000 174174 XBX: BIT #SW13, ISWR DELETE E PRINT OUT? 
1033 O0S006 001105 BNE :BR IF NO PRINT OUT WANTED 
1034 O0S010 021637 001234 CMP (SP) .LSTERR WAS THIS ERROR FOUND LAST TIME” 
1035 005014 001404 BEQ :BR IF YES 
1036 OOSO16 011637 001234 MOV (SP) .LSTERR ?RECORD BEING HERE 
1037 O0S022 105037 901325 CLRB. — ERRFLG ‘PREPARE HEADER 
1038 005026 104406 1$: SAVOS :SAVE ALL PROC REGISTERS 
1039 005030 011605 MOV (SP) .RS :GET THE PC OF ERR 
1040 005032 162705 oD0002 SUB #2,R5 :GET ADDRESS OF TRAP CALL 
1041 005036 O11S04 MOV (RS) RY :GET HLT INSTRUCTIO 
1042 05040 RY :MULT BY TWO 
1043 O0SO4e 061504 ADD (RS) ,RY ‘DOUBLE IT 
1044 o0S044 T AGAIN 
1045 O0050% 042704 177001 BIC #17700! R4 :CLEAR J 
104 005052 035372 8. ERRTAB, RY ;GET POINTE \ 
1047 O0SOS&E 012437 005172 MOV (R4)+, ERRMSG § :GET ERROR MESSQGE 
1048 005062 012437 MOV ( OAT ‘GET DATA HEADRER 
1049 OOSO66 011437 O0S216 MOV (R4) DATABP :GET DATA 
1050 005072 105737 001325 TSTB : : 
1051 005076 001403 BEQ YPMSG ; YES : 
1952 005100 005737 onS2l6 TST DATABP !DOES DATA TABLE EXIST” 
1053 005104 001040 BNE TYPDAT ;BR IF YES. 
1054 005106 104402 005672 TYPMSG: TYPE § ,MCRLF 
1055 005112 104402 TYPE MCRLF 
1056 005116 005737 001220 TST Lock 
1057 005122 001402 SE 
1058 005124 104402 oDe14e TYPE  ,MASTEK 
1053 005130 104402 006130 1$: TYPE § {MTSTN 
1066 005134 10441] 905330 CNYRT  ‘XTSTN :SHOW IT 


DOY 
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1061 005140 006217 TYPE _, MERRPC TYPE PC. 

is Gielss pws Oee FT RRP EM Ros 

1064 ope 12g 103399 l 001325 MOVE  &-1, ERRFLG iG MORE HEADER UNLESS NO DATA TABLE. 
1065 005162 005737 005172 TST ERRMSG 1S THERE AN ERROR MESSAGE? 

l 005166 001402 BEG WRKO.FM :BR IF NO. 

1067 005170 104402 YPE ‘Np 

1068 005172 oo0000 ERRMSG: 0 : ERROR MESSAGE 

1069 005174 WRKO.FM: : 

1070 005174 005737 o0S204 TST DATAHD :DATA HEADER? 

1971 o0S200 001402 BEQ TYPDAT :BR IF NO 

1072 oO0S202 104402 TYPE : TYPE 

1973 005204 o00000 DATAHD: O : DATA HEADER 

1074 005206 005737 o0S216 TYPDAT: TST DATABP :DATA TABLE? 

1975 OO0S2el2 001402 BEQ RESREG :BR IF NO. 

1076 O0S214 104410 CONVRT ; SHOW 

1077 005216 o00000 DATABP: O DATA TABLE 

1978 005220 104407 RESREG: RESOS : RESTORE PROC REGISTERS - 
1079 O0S222 022737 003522 o00042 HALTS: CMP #SENDAD,d842 = SIF ACT-11 AUTOMATIC MODE, HALT!! 
1080 005230 001403 BEQ 1$ 

1081 005232 005777 173744 TST JSWR ;HALT ON ERROR? 

1082 005236 100005 BPL EXITER ‘BR IF NO HALT ON ERROR 

1083 005240 O10046 1S: PUSHRO :SA —s 
1084 OO0S242 016600 oo00ce MOV 2(SP),RO : SHOW ERROR PC IN DATA LIGHTS 
1085 005246 900000 HALT sHALT 

1086 O0S2S0 012600 POPRO GET RO 

1087 005252 005237 001232 EXITER: INC ERRCNT ; UPDATE ERROR COUNT 

1088 005256 032777 OOO4O0 173716 BIT #SWO8, ISWR :GOTO TOP OF TEST? 

1089 005264 001007 BNE 15 :BR IF YES 

1090 005266 032777 002000 173706 BIT #SW10, ISWR :GOTO NEXT TEST? 

1091 005274 OO1411 BEQ :BR IF 

1092 005276 013737 001216 001214 MOV NEXT RETURN :SET FOR NEXT TEST 

1093 012706 001200 18: MOV aSTACK, SP ‘RESET 

1094 005310 013701 001404 MOV DMCSR, R1 :SET UP R 

1095 005314 000177 173674 IMP JRE TURN :GOTO SPECIFIED TEST 

109% 005320 o0000e2 23: RTI :RETUR 

1097 005322 990001 ERTABO: | 

1098 005324 006 092 -BYTE 6,2 

1099 005326 001276 SAVPC 

1100 005330 o00001 XTSTN: 1 

1101 005332 003 002 -BYTE 3,2 

1102 005334 001226 TSTNO 

1103 sENTER HERE ON POWER FAILURE 

1105 , 

1106 

1107 005336 PFAIL: 

1108 005336 012737 o0S3Sc 900024 MOV #RESTART, 24 :SET UP FOR POWER UP TRAP 
1109 905344 0090 HALT *HALT ON POWER DOWN NORMAL 
1110 005346 900077 BR 

111 :F.AOCESSOR WILL TRAP HERE WHEN POWER IS RESTORED 

1114 00s RESTAR: 

111S 005350 012737 005336 00024 MOV #.PFAIL, 24 :SET UP FOR POWER FAILURE 

Lilé GOS3S& S127 901200 MOY aSTACK, SP “RESET THE STACK POINTES 


EQO4 
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1117 013701 001404 MOV OMCSR,R1 “RESTORE RI 

1118 005366 005037 001416 CLR TEMP ?READY FOR 

1119 005372 27 001416 INC TEMP “PLUS ONE TO THE TIMER! 

1120 005376 0013 BNE 4 ‘BR IF MORE TO GO 

1121 005400 104402 005675 TYPE | MPFAIL : TYPE THE MESSAGE 

ll22 OOS4O4 104411 005430 CNVRT  '‘PFTAB idthar WHAT ages" TO RETURN 70. 

1123 005410 105037 0901 CLRB = ERRFLG ART CLEAN 

1124 005414 005037 001234 ¢LR LSTERR Bese 

1125 o00S420 005011 CLR (RL) tOLEAR MAINT BITS 

1126 OO0S422 104412 MSTCLR :START CLEAN UP OF DEVICE 

1127 005424 000177 173564 JMP JRETURN :START DOING THAT TEST AGAIN. 

1le8 005430 000001 PFTAB: 1 

1129 005432 003 002 .BYTE. 3,2 

1130 005434 001226 TSTNO 

1132 005436 DELAY: 

1133 005436 012777 000020 173746 MOV #20, JOMPO4 

1134 O0S444 104414 ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 

1135 Obs 121111 = 121111 :POKE CLOCK DELAY BIT 

a 4 

1137 005450 104414 ROMCLK. :NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 

1138 905452 121204 121224 : PORTY+IBUS#11 

1139 O00S4S4 032777 000020 173730 BIT #BIT4,90MPO4 :IS CLOCK BIT SET” 

11490 905462 9001772 BEG 1$ :BR IF NO 

ital 905464 o00002 RTI 

1143 OOS465 -MSTCLR: 

1144 OO0S466 152777 000100 173712 BISB sBIT6,30MCSRH  ;SET MASTER CLEAR 

1145 005474 1420777 900300 173704 BIC8 © #BIT6!BIT7. SDNCSRH -CLEAR MASTER CLEAR AND RUN 

1146 o0sso2 900002 RTI : RETURN 

1148 oosso4 -ROMCLK: 

1148 005504 152777 900002 173674 BISB &sBITL,aOMCSRH ;SET ROMI 

1150 005512 013677 173676 MOV 3(SP)+,30MP06 LOAD INSTRUCTION IN SELES 

1151 005516 O6274%6 O00002 ADD #2, -(SP) :ADJUST STACK 

1152 005522 030777 OO0100 1734Se BIT #SWO6 , ISWR ‘HALT IF SWOG =1 

1153 005530 90140 BEG 13 :BR IF SWOS =0 

1154 905532 500000 HALT “HALT BEFORE CLOCKING INSTRUCTION 

1155 005534 152777 cO0003 173644 1S: BISB  s#BITL!BITO,9DMCSRH ;CLOCK INSTRUCTION 

1156 005542 142777 000007 173636 BICB  #BIT2!BIT1!BI70, aDMeSRH CLEAR ROMO, ROMI, STEP 

1157 005550 oo0002 RTI 

1159 oossse _DATACLK: 

1160 05552 013637 O01416 MOV 3(SP}4 TEMP :PUT TICK COUNT IN TEMP 

1161 005556 062746 O00002 ADD (SP) !ADJUST STACK 

11g2 o05562 152777 000020 173616 13: BISB setTa: QOMCSRH :SET STEP LU 

1163 005570 027777 173610 173606 CMP JOMCSR,JDMCSR = WAST TIME 

1164 005576 142777 O00020 173602 SICB ss &BITH, spac Sh CLEAR Lu 

1165 37 O014i6 DEC TEMP Be Trek Oo NT 

1186 10 001364 BNE 1 a NOT DONE 

1167 O0S61e o0000e2 RTI 

116e 005614 000001 3S: .BLKW 1 

1170 OOSE1E TIMER: 


013637 OOL14IE MOV a(SP)+, TEMP :MOVE COUNT TO TEMP 
Oee74e 00002 ADD #2,-.SP) SADJUST STACK 


ne 
58 
es 
Lat) 
w 


FOY 
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7 1$: 
to 104414 ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=5204 
1175 008630 021364 021364 ' PORTH+ IBUS# UREGLL 
11? Q08e32 O52777 o00002 173SS2 BIT #2, JDMPOY ‘TS PGM CLOCK BIT CLEAR? 
117? OOSB40 001772 BEQ Sts ‘oR IF YES 
ti3 45 104414 es: LK :NEXT ORD. IS. INSTRUCTION, RONCLK PC=520s 
tied Boeeds | Asiae4 021364 i ATHe BUS 
1181 QOSE4%% O32777 000002 173536 BIT #2, 20MPO4 Te PON Crock Bit SET? 
1182 005654 001372 BNE 2S BR IF YES 
1189 05656 005337 O014I16 Bec «OCTEMP OUNT 
1184 00562 001361 BNE oS ‘BR IF NOT DONE 
igs Oose64 o000d2 RTI * RETURN 
1137 g20040 000077 MOM:  .ASCIZ. 7-77 
(2) 005672 OOSOIS Oo MCRLF: “ASCIZ <15)< 12> 
(3) 7 377 «053520 020122 MPFATL: “ASCI2 <a77>/PHR FAILED. RESTART AT TEST / 
(B) 005733  -377«O4710S 020104 MEPASS: |ASCIZ <377)/END PASS DZOMF 
(3) 377 Oo0l22 MR ASCIZ <377> 78 
(3) 008760 047377 O20117 o42504 MERR2: “AGCI2 C3779/NO DEVICES PRESENT. / 
2) : 377 OHZ111 Osebe3 MERRS: <ABCIZ <377)/INGUFFICIENT DATA! 7 
( - > 
'5) Boeoss 34> puseiy passas Ee 23 72) /LBGK Of ON SELECTED TEST/ 
(3) 008072 051503 o3sie2 40 MCSRX: “ASCI2 “CSR: 
(3) 006100 O42S26 35103 0 MVECX: ASCIZ. VEC: 
(3) 006106 O40520 051523 051505 MPASSX: [ASCIZ /PASSES: / 
(2) 006117 _ 105 OSliz2 01117 RRX: “ASCIZ /ERRORS: / 
(5) 06130 o42524 O&2123 047040 MTSTN: “ASCIZ /TEST NO: / 
'S) Ooel42 TEK: [ASCIZ 7#7 
(3) Q06144 051777 052105 051440 MNEW:  “ASCIZ <377>/SET SWITCH REG TO OMC11°S DESIRED ACTIVE. - 
(3) 006217 120 036103 Q MERRPC: (ASCIZ /PC: / 
(3) O06224 O20212 O20040 HEAD: “ASCII <212>/ MAP OF OMCLL STATUS, 
(3) 0040 hi a, ee tana Aino oer 
(3) 06322 o20212 OS0040 920103 “RSCIT <B12>/ PC CSR. STAT! STAT2 star3 
(3) O26455 O26455 TECTE  ¢20Pfemames “noah semen “deem weemead 
(3) poe4so 094377 053517 O4B4aC NUM: SASCIZ <377)/HOW MANY DNCI1°S TO BE TESTED?” 
(B} 006510 041777 051123 O4O4HO CSR: 'ABCIZ <377)/CSR_ADDRESS?7 
‘B) 006526 053377 O41505 047524 E "ASCIZ <377)/VECTOR ADDRESS? / 
(3) Q0e847 377 051102 OSOoNO PRIO:  “ASCI2 <377>/BR PRIORITY LEVEL? (4,5,6,7)?/ 
(3; 0660 044777 O20106 o46sc4 CRAM:  “ASCIZ <377)/IF DMC HAS CRAM (MB204) TYPE “Y", IF_CROM (M200) TYPE “Nn 
‘5; 06704 053777 O44510 O44103 MODU: “ASCI2 <377>/WHICH LINE UNIT? IF NONE TYPE “N*, IF Ma20i TYE i ha 
(2) 007016 081777 O4Hee7 O41Seu LINE:  “ASCI2 <377>/SWITCH PACS] (ODCMP LINE #)?- 
3) 051777 O44S27 041504 MH "ASCIZ 377) /SWITCH PACH2 (BMS73 BOOT ACD)? 
5) go71i 020123 044154 "ASCIZ <377>/1S THE LOOP BACK CONNECTOR ON? 
(3) 907164 047377 050117 o4e2504 NOACT: “ASCI2 <377)/NO DEVICES ARE SELECTED: 
(3) 377 051412 051127 SuMES: “ASCIZ (37?) 12> /SHR= 7 
3) 116 0S 0200 Si: :ASCIZ NEW" coo 
(5) 907523 377 «943377 O41S CONERR: “ASCT +) <977>/DMCLI FOUND AT NON-STANDARD ADDRESS FC: 
(2) 007277 377 OS4105 OYeS20 CNERR:  “ASCIZ (307 EXPECTED FOUND’ 
3) 00 p24040 O4es04 02 DMcn: <ARCIZ (DMC) 
(2) 007330 Oe4040 O4e513 O24502 KMCM: ASCIZ 7 (KMC) i eee re 
(3) 042377 O41Si5 O30461 SPEED: | :ASCIZ (977) “DMCLI-AR(REMOTE.LOM SPEED) OR DMCLI-AL/LOCAL.HIGH SPEED) 7 
\g3 , 
‘35 po7vusu poooos YETATO: 5 
118 OO7Wee 06 on "BYTE 6,3 
TTES fo74e0 og1b4e TEMP] 
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O06 
001250 
006 
001252 
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001254 
0C& 
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Ll-JUL-77 11:59 PAGE 25 
:18 GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC) 
003 .BYTE 6,3 
TEMP 
003 BYTE 6,3 
TEMP3 
003 .BYTE 6,3 
TEMPY 
902 .BYTE 6,2 
TEMPS 
EVEN 
:BUFFERS FOR INPUT-OUTPUT 
INBUF 0 
MDATA: O 
.=. +4 
:ROUTINE USED TO CHANGE SOFTWARE SWITCH 
:REGISTER USING THE CONSOLE TERMINAL 
000:76 oo1202 CKSWR: CMP sSWREG, SWR :IS THE SOFT SWR BEING USED” 
BNE CKSWRS !BR IF NO 
171362 TSTB = ATKCSR :IS DONE SET? 
4 BPL 2s :GO ON IF NOT SET 
77777 «003734 MOV #-1,00 IF DO SET SET 
0007 171346 23: chp #7, JTKDBR ; WAS CT RL ET BED LB “ert a scrim 
000207 171336 CMP #207, JTKDBR :WAS CTRL G TYPED? (@ BIT ASCII) 
_ BNE CKSWRS :BR IF NO 
1$: MOV Re,-(SP) :STORE Re 
MOV R3.-(5P) :STORE R3 
MOV R4'-(SP) :STORE RY 
177777 010016 MOV #-1, SWFLG : SET SOFT TYPE OUT FLAG 
CKSWRI: CLR R2 CLEAR NEW SWR CONTENTS 
MOV #-1,R4 SE FLAG TO ALL ONES 
907205 TYPE  ,SWMES YPE “SWR= 
CKSWR2: CNVRT i TYPE OUT PRESENT CONTENTS 
SOF TSW ‘OF SOFT SWITCH REGISTER 
007215 CKSWR3: TYPE SWMES1 : TYPE “NEW? 
010020 CKSWRY: JSR PC. INCHAR :GET RESPONSE 
ooo0rs C #15,R3 :WAS IT A CR? 
BEG c$ :BR IF YES 
000012 CMP #12,R3 :WAS IT A LF? 
BEQ 4§ :BR IF YE 
oo002s CMP #25,R3 :WAS IT CTRL U? 
8EQ CKSWRI :BR IF YES(START OVER) 
000907 C 37. R3 :IF CNTL G GET NEXT CHAR 
BEQ CKSWRY ? : 
CL RY ;IT MUST BE A DIGIT SO CLR FLAG 
177770 BIC 8177770,R3 :ONLY O-7 ARE L LEGAL L 50 MASK SFF BITS 
ASL R2 :SHIFT R2 3 TIMES 
SL ted 
ase Ro 
BIS R3,R2 :ADO LAST CIGIT 


PAGE: 
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OZDMF  MACYL] 30(1046) L1-JUL-77 11:59 PAGE 26 PAGE: OO4E 
DIOME.PLL © 12=MAY-77 14:18 GENERAL UTILITIES (TYPEOUT, ERROR. SCOPE, ETC) 

! : R Ck XT 

isi BRSo BG Boo oeE oo2002 00006 48: By eT RRT, (SP) opt Whe tyBEB eo "58 TO START 

{548 RRSS26 BB TABS ; Bae fy fp fb? te SOFT SWR 

1250 007776 910877 471200 ™ HOV Re .aSHR : dF ey eeu WRITE NEW CONTENTS TO SCET SWR 

ied Bt Bobs ieee ° MOV (SP)+,R4 tRESTORE R 

1253 010010 012603 MOV (5P)+°R3 : RESTORE R 

1254 O10012 O16 MOV (SP), R2 :RESTORE R2 

l 56 19014 00020 CKSWRS: RTS pe 

ie? 010016 oo0000 SWFLG: 0 

1259 010020 105777 171169 INCHAR: TSTB aTKCSR 

tSe) Bipose Arges 171154 a aTkoeR, Ra 

i flask Tacos i133 TSTB. aT pcs SR 

cae By astoreoe 

See Bibbus ba8s03 AaddcR BIC ig arog 

1266 O100So0 9o0de07 RTS PC 

igbe 919052 90090 _ SOF TSW: — “9 

+383 615556 occoite wap SWREG ¥ 


104 
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DZOME.P11  12-MAY-77 14:18 GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC) 

i274 

1558 'ROUTINE USED TO “CYCLE” THROUGH UP & DMC11°S 
le74 j THIS RO OuTy NE SE SETS, UF TH akONTROL Foosese FOR THE DIAGNOSTIC 
1e7s AND RU NS SPECI THIS ROUTINE #MUST# 
1276 : BE RUN FIRST BEFORE TED TERING Fine DIAGNOSTIC FOR THE 
1277 : SETUP NECESSARY. 

1528 ' 

1280 010080 005737 001306 CYCLE: TST OMACTY : ARE any OMC11°S TO BE TESTED? 
1281 10064 001004 BNE 1$ : BR 

1282 010066 104402 007154 TYPE _,NOACT iN BNC I *S SELECTED!! 

1e83 010072 o00000 MAL T THE SHOW. 

1284 010074 000776 BR -2 ‘BISOUAL FY CONT. SW. 

1285 010076 000241 1S: CLC CL LEAR PROC. CARRY BIT. 

1286 010100 006137 9001316 ROL RUN :UPDATE POINTER 

1287 010104 905537 001316 ADC RUN ; CATCH CARRY FROM RUN 

1288 010110 062737 000004 001322 ADD “UPDATE POINTER 

1289 010116 062737 000010 001320 ADD 4 been ‘UPDATE ADDRESS POINTER. 
1290 010124 022737 001700 001320 CMP #0: MAP+200, CREAM 

1 UOT BE soy onize Be marscrean AEEED EEN Mpa HAherESTE FO 
1293 010142 012737 001702 001322 MOV #CNT.MAP MILK  :RESET PASS COUNT POINTER 
129% 010150 37 001316 001306 2$: BIT RUN, omacty iB Tete TY IVE? 

1295 010156 001747 Q 1 

ia Giciee gtarge tae my EAE uate 

ee 

1538 818180 Bt 0015 MOV MILK Re cp fone pte 

1299 010174 011037 001374 MOV (RO), OMRVEC eTOR © 

1300 010200 042737 177000 001374 BIC #177000, DMRVEC + ROEDR “HRUPNTED BITS 

1301 010206 012037 001366 MOY (RO)+, STATI :LOAD STA 

1302 O102l2 012037 901370 MOV (RO)+;STAT2 : LOAD erate 

1303 010216 012037 001372 MOV (RO)+; STATS ;LOAD STATS 

1304 O10e22 012237 001230 MOV (R2)+,PASCNT LOAD PASS COUNT 

1305 010226 012237 001232 MOV (Re) +; ERRCNT OAD ERROR COUNT 

1306 010232 012700 o0000e MOV 82.R0° :SAVE CORE THIS WAY! 

1307 010236 013737 OO1404 001406 MOV OMeSR DMCSRH 

1308 0102044 005237 901406 INC OMCSRA 

1309 010250 013737 001406 001410 MOV OMCSRH, DMCTL 

1310 010256 005237 001410 INC OMCTL 

1311 0102be 013737 OO1410 ool41e MOV OMCTL. DMPO 

1312 013270 060037 O0i4l2 ADD MP 

1313 010274 013737 OO1412 001414 MOV DMPO4 . DMPO 

1314 010302 060037 001414 ADD RO, DMPOG 

1316 010306 013737 001374 001376 MOV DMRVEC OMRLVL ;PTY LYL 

1317 010314 060037 001376 ADD OMRLVL : 

1318 010320 013737 901376 001400 MOV SrA OMTVEC :TX VEC 

1319 010326 950 901490 aod ec : 

1320 010332 013737 1400 001402 MOV ontvec TLVL ;TX LVL 

gel 019340 0600327 001402 ADD 9,OMTLVL 

1323 910344 0327327 o00002 occle26 SIT #SWO1,STRTSW =; IS TEST NO. SELECTED 

1324 0103S2 00! BEQ 7 :BR IF NO 

t3eS 910954 4$: 

1226 210384 005727 oD0042 TST 2842 “RUNNING IN AUTO MODE? 
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11:59 PAGE 28 PAGE: 
GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC) 
BN 75 BR IF YES 
YPE | MCRLF 
INSTR sGET TEST NO. 
NTSIN 
P aM 
1000 
TSTNO 
‘BYTE O 
"BYTE | 
MOV #TST1,RO 
Ss: CMP (PC)+; (RO) :CMP FIRST WORD TO 12737 
MOV (PC)+, a(PC)+ 5 ip par en 
te #810, 2¢Ro Bed 1e9h0 akc? 
CMP 8TSTNO,4(RO) 31S LAST WORD Ok? 
BNE :BR IF N 
HOV RO, RETURN IT 1S A LEGAL TEST SO DO IT 
BIC kSWO1, STRTSW 
BR 95 
6S: TST (RO)+ POP RO 
CMP RO,#TLAST+10 §-:AT END YET? 
BNE $ BR IF NO 
YPE MQM : YES ILLEGAL TEST NO. 
BR 4g TRY AGAIN 
75: MOV #TSTI,RETURN § ;PREPARE RETURN ADDRESS 
QS: MOV DMCSR’R1 "Rl = BASE DMC11 ADDRESS 
IMP JRETURN :GO START TESTING. 
ROUTINE USE on? “AUTO SIZE” THE DMC11 
'CSR AND VEC 
:NOTE: THE oon MAY BE ANY WHERE IN THE FLOATING 
: RODRESS RANGE (160000: 164000) 
: AND THE VECTOR MAY BE ANY WHERE IN THE 
: FLOATING VECTOR RANGE (300:770) 
AUTO. SIZE: 
RESET : INSURE A BUS INIT. 
CSRMAP: MOV #OM. MAP, R2 POINTER. 
1$: CLR (R2)+ ERO ENTIRE MAP 
CMP af. END, R2 tALL DONE? 
BNE ;BR IF NO 
CLR OMNUM ‘SET OCTAL NUMBER OF oMc1I°S TOO 
MOV 80M. NAP, R2 :R2 POINTS TO DMC MAP 
CLR OM CLEAR ACTIVE 
BIT SHO. VSTRTSW ; QUESTIONS 
BNE +6 :BR IF stip 
IMP 7g !IF NO SKIP QUESTIONS 
MOV #1, TEMPS :START WITH 
INSTR 
NUM 


co4e 
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DZDMF  MACYL1 30(1046) L1-JUL-77 11:59 PAGE 29 PAGE: 0049 
DZDME.P11 § 12-MAY-77 14:18 GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC) 
3 91057 44 PARAM 
Hes Sites Meaty 
l 10576 1b. 
1386 O01 001252 TEMPS 
1387 Ol 000 BYTE 0 
eS 0393 001252 001310 Adv teres orm :DMNUM = HOW MANY 
les: Y CRL 
! 1061 ttt CohpRT : TYPE WHICH DMC IS BEING DONE 
1392 010620 012002 WHICH :TEMPS IS WHICH DMC 
1393 010622 005237 001256 INC TEMPS 
t3¢e Dibese Agecta a 
139% 010632 ARAM 
1397 010634 1 160000 
1398 010636 16 164000 
139S 010640 001254 TEMPY 
1400 010642 .BYTE 0 
1401 010643 001 "BYTE 1 
1402 O10644 013722 001254 MOV TEMPY, (R2)+ :STORE CSR IN MAP 
1403 010650 104403 INSTR 
14 l VEC 
14 10654 q PARAM 
14 l 0 
1407 010660 775 776 
1408 010662 001254 TEMPY 
i409 010664 000 .BYTE 0 
1410 010665 001 "BYTE 1 
1411 010666 013712 001254 MOV TEMPY, (R2) :STORE VECTOR IN MAP 
tats GIDETS Gomeue — SASK WHAT BR LEVE! 
tgty Bt 76 Mattei 012266 neh PC, INTTY cet Bee RCE 
1415 010702 022703 900024 C #24, R3 
1416 010706 101014 sata BHI ie je ‘aR IF LESS THAN 4 
1316 sat See een ito é ; BR IF GREATER THAN 7 
1 ll MOV #11,R4 ER OF SHIFTS 
i4 010728 ASL He uF 183 wi 
1421 Ol DEC RY :DEC SHIFT COUNT 
1422 010726 001375 capes BNE , - ieee NOT ana. 
tisq Bt 853g e633 Bts ed ae "Brarus MAP 
Re Gleeg joes os: fe ® 
14 Bigs Ape Pe MQM os te IS OUT OF LIMITS 
1428 010744 000752 BR 10$ : TRY AGAIN 
1429 010746 104402 Og TYPE 
1430 010750 Og CRAM :DOES HC HAVE CRAM? 
1431 010752 004737 oO12266 JSR PC INTTY :GET REPLY 
143e 010756 022703 000121 CMP #131,R 
1423 010762 001427 BEG YES 
14 g10764 pee? 03 00011¢ C #116,R3 NO 
14 1 0014 BEG 40$ ;NOT A Y OR 'N 
1436 910772 104402 TYPE 
1437 0] 00s MOM TYPE "7" 
1436 015776 9000763 BR 9 ‘SK AGAIN 
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BL eS 
144 i 
Lie ba $85 
144 11014 1414 
i 1838 ahs 
i GHiee fee 
1447 011026 O0S666 
oe | ue 000763 
is SH aac 
1451 911042 OSe71e 
1452 QO110%6 1 
1453 011050 906 
1454 011052 004737 
1455 011056 022703 
1456 011062 001417 
1457 011064 
1458 011070 O014le 
1459 011072 022703 
9 Rive 001403 
RB Gig 
ios 011104 the 
AB GH Be 
ae Ge ae 
Hee SHS oes 
ee GH ga 
1471 Biase aee784 
1472 011136 001406 
1473 011140 
1474 O11144 001406 
1475 011146 104402 
1476 011150 
i477 0111Se 000763 
ie Guess 
Re HE BES 
1481 011166 
1482 011166 104403 
1483 011170 007016 
1484 011172 104405 
1485 011174 
1486 011176 77 
1487 011200 001254 
1488 O11e0e 000 
1489 011203 001 
1490 011204 113722 
1491 011210 104403 
149e Qllele 7054 
1483 G11e14 104405 
i494 Oll216 000000 


ll-JUL-77 
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100000 


012266 
o000e | 
o0o0ee 
000116 


010000 
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012266 


000131 
000116 


049000 
040000 


001254 


000004 


11:59 PAGE 30 
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PAGE: 


GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC) 


40$: 


41$: 


9$: 


168: 


323: 


31$: 
30$: 


17$: 


18$: 
19S: 


see 
16$ 


#114,R3 
41§ 


40$ 
#BIT1,4(R2) 
eBIT1S, (R2) 
PC ,INTTY 
si 
#22,R3 

31$ 
#116,R3 
3e$ 


it 2, (R2)+ 
hay te BS. 

33$ 

#BIT13, (Re) 


PC INTTY 
a131,R 


4116, R3 

18$ 

30$ 

#BIT14, (R2)+ 


1 
@BITIL4, (R2)+ 


0 
1 
TEMPY, (R2)+ 


;OMC11-AR OR DMNC11-AL? 
3GET BERPONSE 


‘BR IF REMOTE 
: L 
‘BR IF LOCAL 


; TRY AGAIN 

;SET BIT] IN STATS 
; CONTINUE 

;SET BIT 15 IF CRAM 


;ASK WHICH LINE UNIT 
GET REPLY 


;IF NOT A 1,2 OR N TYPE “?™ 


RY eT tS rN sTAT2 IF_NO LU 

i Bip Rice EA}. AND star ss 

:SET BIT 13 IN STAT IF Ma202 

sASK IF LOOP-BACK IS ON 

:GET REPLY 

3N 

:1F NOT YOR N TYPE "2" 
TRY AGAIN 


; TURNAROUND IS CONNECTED 
;NO TURNAROUND 


;STORE SWITCH PAC IN MAP 


oC 


Cc 


- 


6) 


MO4 
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RSPR PL 12-MAY-77 14:18 GENER atILITIEs (TYPEOUT, ERROR, SCOPE, ETC) 

1495 011220 000377 377 

14% Ollee2 001254 TEMP4 

1497 011224 000 BYTE 0 

4 Bt 1552 113995 001254 aby tenpy, (R204 ;STORE SWITCH PAC IN MAP 

1500 Olie32 005722 TST (Re)+ ‘POP OVER STAT3 

1501 011234 001252 33S: DEC TEMP3 ;DEC COUNT 

1506 11 402 Q 34S 

ioe oliew ayer Quine ss ie ie rie 

1505 ot 1528 12701 ad 33 MOV #160000, Rl sCONT EE rest ADDRESS TG BE TESTED 
1506 011256 012737 011774 oO0004 MOV #6$, a84 :SET FOR NON-EXISTANT DEVICE TIME OUT 
1507 Oliebs 005011 25: CLR (RI) :CLEAR SEL 

1508 011266 711 TST (R1) ‘IF DMC11 DMCSR S/B O 

1509 011270 001172 3$ ‘TF NO DEV ; TRAP TO 4. IF NO BIT @ THEN NO DMC1 
Tel] LISTE BOESEL  SODOCE ce BIR} eee CLT THEN DMRIC §/8 =0! 

1213 pt is78 rate 3$ ‘BR IF NOT DMC11 

1513 011304 012711 oO2000 MOV #BIT10, (R1) ;SET ROMO 

1514 011310 1 o00004 CLR 4(R1) ?CLEAR SELY 

1318 O11 14 bievel 125252 000006 NOV bleses2,6(R1) tT THIS TO SEL6 

1215 pt ae 1 125252 000004 CMP seesee GRID WAS IT WRITTEN? 

1518 011334 001004 BNE 21$ :IF NO IT IS NOT CRAM 

1519 011336 OS2762 100000 onD000e BIS #B1T15,2(Re) ‘SET BITIS IF CRAM 

1520 011344 000431 BR 225 

1521 011346 012711 001000 21$: MOV #8179, (R1) ;SET ROMI 

1522 011352 012761 100417 oD0006 MOV #100417,6(R1)  :PUT RNSTRUCTION IN SEL6 

1523 011360 012711 001400 MOV #BI1T9'BITS, (R1) :CLOCK INSTRUCTION (MICRO PROC PC TO 0) 
1524 011364 012711 Od2000 MOV #BIT10, (R13 :SET ROMO 

1525 011370 022761 000626 oD0006 CMP #626, 6(R1) IS IT LOCAL CROM 

1526 011376 OO1411 BEQ 23$ :BR 

1527 O11400 022761 016520 on0006 CMP #16520,6(R1) 1S IT REMOTE CROM? 

1528 011406 001410 BEQ 225 :BR I 

1529 011410 022761 177777 000006 CMP #-1,6(R1) :NO CROM? 

1530 011416 OO1404 BEQ 225 :BR IF YES 

1531 011420 O00Si6 3$ ;NOT A DMC 

1532 O11422 OS276e 900002 on0006 23$: BIS #B1T1,6(R -SET BIT 1 IN STATI 

1533 “AT THIS POINT IT IS ASSURED THAT R1 HOLDS A DMC11 CSR ADDRESS. 

1534 011430 010122 225: MOV R1, (Re)+ :STORE CSR IN CORE TABLE. 

1535 011432 012711 001000 1S$: MOV #BtT9, (RL) :CLEAR LINE UNIT LOOP 

1536 011436 005061 O00004 CLR 4(R1) :CLEAR_PORTY 

1 011442 012761 122113 oo0006 MOV #122113,6(R1) LOAD INSTRUCTION (CLR DTR) 

1538 011450 052711 Og0400 BIS #BIT8, (R ‘CLOCK INSTRUCTION 

1539 O114S4 012761 021264 oD0006 MOV #021264.6(R1)  ;LOAD INSTRUCTION 

1540 011462 052711 OO0400 BIS #8178, (R1) :CLOCK INSTRUCTION 

1541 O11466 122761 000377 cD0004 CMPB. 3s #377, 4(R1) IS IT ALL ONES? 

1542 011474 001003 BNE + :BR IF NO 

1543 011476 052712 010000 BIS #8712, (R2) IF YES, NO LINE UNIT, SET STATUS BIT 
1544 011502 000436 BR 20$ 

1545 011504 032761 oo0002 ocDD004 BIT #81T1,4(R1) :IS SWITCH A ONE? 

1546 011512 001403 BEG +1 -BR IF MA201 

1547 011514 052712 oEeD000 81s #B1T13°BIT14, (Re) jnBede ASSUME CONNECTOR 

1548 011520 000427 BR OR ON) 

1549 011522 032761 000010 900004 BIT #8173, 4(R1) :1S NRO SET 

1850 011530 001023 BNE 20$ :BR IF MB2O1 NO CONNECTOR (ON LINE) 


NO4 


DZDMF MACYLI 30( 1046) L1-JUL-77 11:59 PAGE 32 PAGE: o0S2 
DZDME.P11 § 12-MAY-77 14:18 GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC) 

1551 011532 012761 000100 900004 MOV #B1T6, ¥(R1) ;LOAD PORTY 

1552 011540 012761 122113 000006 MOV eieell3 6(R1) LOAD INSTRUCTION 

1553 011546 052711 000900 ae BIS #BITe (RL) :CLOCK INSTRUCTION(SET DTR) 

122d Bt 12s pase BIS wort dag i000 1 TN TRUCT ON READ MODEM REG) 
l 011564 032761 000010 o00004 BIT #81T3,4(R1) ;15 MRDY SET 

1 p15 bois BEQ 20$ IF NO RONNEC TOR 

15 11574 le o40000 | BIS #BIT14, (Re) :SET STATUS BIT FOR CONNECTOR 
1559 011600 005722 20$: ‘TST (R2)+ :POP POINTER 

1560 G1l602 012761 021324 o00006 MOV #021324,6(R1)  :PUT INSTRUCTION IN PORTE 

1561 011610 012711 001400 MOV eBITS'etTe, (R1) :PORTY+LU 15 

1562 011614 156122 OO0004 BISB 4(R1). (Re)+ : STORE LINE # IN TABLE 
1563 011620 012761 021344 ooo00& #021394.6(R1)  ;PORTG*+INSTRUCTION 

1564 O11 012711 1400 MOV #81T8!etTs, (R1) ;CLOCK INSTR. 

1565 011632 156 000004 81 4(R1), (Re)+ IN TABLE 

1566 0116 % S (Re)+ R STAT 

1567 O116 II CLR (RI) : ROMI 

1568 O11642 005237 001310 INC DMNUM ;UPDATE DEVICE COUNTER 

1569 O11646 022737 000020 001310 CMP #20, DMNUM [ARE MAX. NO. OF DEV FOUND? 

1570 011654 OO1412 BEQ 13$ tYES DON’T LOOK FOR ANY MORE. 
1571 011656 O0SO1! 3s: CLR (RL) : CLEAR BIT 10 

1572 011660 005061 o00006 CLR &(R1) : SEL é 

1573 O11664 062701 000010 14$: ADD #10,R1 ‘OPDATE CSR POINTER ADDRESS 
1574 011670 022701 164000 CMP #169000,R1 

1575 011674 O01402 BEQ 13$ :BR IF DONE 

1576 011676 000137 011264 JMP 2$ : JUMP IF NOT 

1577 011702 005037 001306 13$: CLR DMAC TV 

1578 011706 005737 001310 TST DMNUM ;WERE ANY DMC11°S FOUND AT ALL? 
1578 011712 001423 BEQ S$ ?ERROR AUTO SIZER FOUND NO DMC11°S IN THIS SYS. 
1580 011714 013701 001310 MOV DMNUM, R1 

1581 011720 010137 001314 MOV R1, SAVNUM ;SAVE NUMBER OF DEVICES 

1582 011724 O00e41 4§: CLC 

1583 011726 006137 001306 ROL DMACTYV ; GENERATE ACTIVE REGISTER OF DEVICES. 
1584 011732 005237 001306 INC DMACTV :SET THE BIT 

1585 011736 005301 DEC Rl 

1586 011740 001371 BNE 4§ ;9R IF MORE TO GENERATE 

1587 011742 012737 oO00006 900004 MOV #6, 284 :RESTORE TRAP VECTOR 

1588 011750 013737 901306 001312 MOV DMACTV,SAVACT  ;SAVE ACTIVE REGISTER 

1589 011756 000137 012010 IMP VECMAP GO FIND THE VECTOR NOW. 

1590 011762 104402 005760 S$: TYPE MERR2 !NOTIFY OPR THAT NO DMC11°S FOUND. 
1591 011766 OOSO00 CLR RO : MAKE bara LIGHTS ZERO 

1592 011770 o00000 HALT ;STOP_T 

1593 011772 000776 BR 2 E CONT. SW. 

1594 011774 O12716 O11664 6$: MOV 814$, (SP) ‘ENTERED BY NON-EXISTANT TIME-CUT. 
1595 012000 000002 RTI :RETURN TO MAINSTREAM 

1597 oO12002 000001 WHICH: 1 

1598 012004 O02 oo2 -BYTE 2,2 

1599 012006 001256 TEMPS 

1601 012010 37 000001 001236 VECMAP: BIT sSWOO, STRTSH 

1602 b1e016 001114 BNE S$ 

1603 012000 012737 000340 oD0022 MOV #340, a822 ;SET I0T TRAP PRIO 10 7 

1604 012026 012737 Oleec2 00020 MOV 84S, 4055 :SET IOT TRAP VECTOR 

1605 012034 Ole702 001500 MOV 80M! MAP, :SET SOFTWARE POINTER 

1606 012040 012700 000300 MOY #300, RO" :FLOATING VECTORS START HERE 
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1607 312044 012701 000302 MOV #302,R1 :PC OF IOT INSTR. 

1608 012050 0101 1S: MOV R1, (RO)+ :START FILLING VECTOR AREA 
1609 012052 012721 O00004 MOV #4’ (R1)¢ : .42; I0T 

1610 012056 O22021 CMP (RO)+. (RL)+ :ADD 2 TO'RO +R1 

1611 012080 Oe0127 001000 CMP R1, #1000 

1612 012064 101771 BLOS 6s«1S ;BR IF MORE TO FILL 

1613 012066 013737 001246 MOV OMACTV,TEMP1 § :STORE TEMPORALLY 

1614 012074 006037 001246 2S: ROR TEMP ‘BRING OUT A BIT 

1615 012100 103063 BCC S$ ‘BR IF ALL D 

1616 Qi2102 012704 12 MOV #12, R4 :R4Y IS INDEX REGISTER 

1817 O12106 O16437 Ole2Se 177776 MOV BRLYL(RY),PS  :SET PS TO 7 

1618 O12114 011201 MOV (Re) RI 

1619 Ol2116 O12761 000200 oO00004 MOV #200'4(R1) 

1620 012124 012711 001000 MOV #BIT9, (RL) :SET ROMI 

1821 012130 012761 121111 000006 MOV #121111.6(R1) | PUT INSTRUCTION IN PORTE 
1622 012136 012711 001400 MOV sBIT9'BITS, (R1) :FORCE AN INTERRUPT 

1623 Olel4¥e 105200 7§: INCB = RO STALL 

i624 O12e144 001376 SNE -2 :FOR TIME TO INTERUPT 

1625 012146 162704 000002 SUB #2,R4 GET NEXT LOWEST PS LEVEL 
1626 O121S2 001404 BEQ :BR IF R4¥ = 0 

1627 012154 016437 012252 177776 MOV BRLVL(R4Y),PS | :MOVE NEXT LOWER LEVEL IN PS 
1622 O12162 000767 BR ?BR TO DELAY 

1629 012164 OS27b2e 005300 op0002 6S: BIS #5300, 2(R2) "NO INTERUPT ASSUME 300 AT LEVEL 5 AND FIX CMC! 
1630 O1e172 O0SD011 33: CLR (R1) :CLEAR ROMI 

1631 012174 O62702 oOoovIc ADD 810,R2 :POP SOFTWARE POINTER 

1632 Ole200 000735 BR ?KEEP GOI 

1633 Ol22d2 OSlb62 000002 4S: BIS (SP), 2(R2) GET VECTOR ADDRESS 

1634 O12206 O42e762 009007 oD0002 8:C 87,2tR2) :CLEAR JUNK 

1635 012214 O1640S 012254 MOV BRLVL+2(R4).RS :GET BR LEVEL OF OMC11 

i636 012220 006305 ASL RS :SHIFT LEVEL 4 PLACES 

1637 Ol2222 006305 ASL RS :TO THE LEFT T 

1638 012224 006305 ASL RS :STATUS TABLE 

1639 012226 006305 ast RS 

1640 012230 O4e70S 170777 BIC 8170777,RS ;CLEAR UNWANTED SITS 

1641 012234 oOS0S62 O0000e2 SIs RS. 2(Re} :PUT BR LEVEL IN STATUS TABLE 
lg4¥2 012240 O22626 CMP (SP) +, (SP)+ -POP IOT JUNK OFF STACK 
1643 Ol2242 012716 012172 MOV #33, (SP) :SET FOR RETURN 

1644 912246 o00002 RTI a 
1645 012250 000207 S$: RTS PC ALL DONE WITH “AUTO SIZING" 
1647 012252 op0000 BRLYL: O sLEVEL 0 

1648 012254 000000 0 :LEVEL 0 

1649 012256 000200 200 "LEVEL 4 

1650 012260 o00240 240 "LEVEL § 

1651 Ol2262e 000300 300 "LEVEL 6 

1652 Ole264 000340 340 =LEVEL 7 

ieea 

1655 012266 105777 166712 INTTY: STB  aTKCSR :WAIT FOR DONE 

1656 Ole272 100375 BPL <4 

1657 012274 017703 166706 MOV JTKOBR,R3 :PUT CHAR IN R3 

658 012300 105777 166704 TSTB aTPCSR =WAIT UNTIL PRINTER IS READY 
163 012304 100375 BPL <4 

1660 012306 010377 166700 MOV R3, JTPDBR sECHO CHAR 

1661 012312 042702 GOd240 BIC eBtT7'BITS.R3 MASK OFF LOWER CASE 

lete Ole2le 00620 RTS pc : RETURN 
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1683 
1664 02100 
ee 
1687 s SEREERERERERRRREEEREREEREEE TEST | £SeERSEEEE EE ESSE EES EEE E EE 
1668 : #OUT CONTROL REGISTER READ ONY TEST 
1863 : #D0 A MASTER CLEAR yen ate ALL READ/ONLY 
16; seB1TS ARE IN THE CORRECT STATE 
1624 eB RR Ek __, aera 
’ 
ibe ; TEST 1 
1675 012320 012737 000001 O0i2e6 TST1: Mov #1, TSTNO 
1876 012326 012737 012374 OOlel& MOV aTST2, NEXT 
1677 ;R1 CONTAINS BASE OMC11 ADDRESS 
1878 012334 O0S077 167044 CLR a0MCSR CLEAR aot a 
1679 Qle340 Ole70e 000011 MOV #11,R2 :SBVE Re TYPEOQUT 
1680 012344 104414 ROMCLK Reeb OF aD bt ROMCLK PC=5204 
1681 012346 21224 021004! <20#11> : PORTYeL INE UNIT SEG 11 
1682 0123S0 016104 000004 MOV 4(R1),R4 PUT “FOUND” IN 
1683 012354 O42704 oO000S4 BIC 8S4,R4 :C UNK BI 
1684 012360 Ole7 000020 MOV #20,RS ;PUT “EXPECTED” IN RS 
1685 012364 120504 CMPB RS. !I§ OUT READY SET 
l 012366 001401 BEG ; YES 
1687 912370 104002 HLT 2 sERROR IN LU 11 
1688 Ole37e 104400 1$: SCOPE :SCOPE THIS TEST 
180 
1631 ; RRRELEEERERRERERERERELEEEES TEST OC SEREEEEEERE EEE RRET EEL ST EDES 
163e :#IN CONTROL REGISTER READ/ONLY TEST 
1633 :#D0 A MASTER ae VERIFY THAT ALL READ/ONLY 
1694 817 S ARE IN THE CORRECT STATE 
te s LERERERELE EE RALEE EERE RRR SRLES SRR LSERRSLRS SALLE EELS ESTEE RES 
a4 ; Teste 
1699 012374 912737 oO00002 001226 TST2: Mov #2, TSTNO 
1700 Ole402 012737 Ole442 OOlelé MOV #1573, NEXT 
1791 ;R1 CONTAINS BASE DMC11 ADDRESS 
1702 Ql2410 O12702 o00012 ll #12,R2 ; SAVE Re FOR TYPEOUT 
1703 O12414 104414 ROMC sNEXT WORD IS INSTRUCTION, ROMCLK PC=5320% 
170% O12416 021244 821004! (e081@) ;PORTY¢LINE UNIT REG ie 
170S QOle4e0 016104 o00004 MOV (R1),R4 PUT “FOUND” IN RY 
1706 012424 042704 000017 BIC ¥17.R4 :CLEAR UNKNOWN BITS 
1707 912430 o0S005 CLR aS : PUT “EXPECTED” IN RS 
1708 Ole432e 120504 CMPB RS,R4Y : ARE ALL BITS CLEARED? 
1709 012434 001401 BEQ 1$ :BR YES 
1710 Q12436 104002 HLT e ‘ERROR IN LU 12 
i O1le440 104400 1S: SCOPE : SCOPE THIS TEST 
1775 
1714 sRRERRERERERR REAR AR REEREREEE TEST 3, SRRARRARRRRLARASRAASRALSBAGE 
1715 ; #MODEN CONTROL REGISTER READ/ONLY TEST 
1716 -#D0 A MASTER CLEAR, VERIFY THAT ALL READ-ONLY 
171; :#811S ARE IN THE CORRECT STATE 
af le sRSRALAASRASARARSAAALAREAAAAAARAELARERRARRATPAAFRATERARAAAERALAR? 
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MACYLI 30; 1046) gifgtue-?? 11:59 PAGE 3S PAGE: 00 
-PlLL © -12=MAY-77 14:18 LINE UNIT READ/ONLY TESTS 
; TEST 3 
O1e442 012737 000003 001226 TST3: MOV 83, TSTNO 
0104S0 0120737 012514 OO01e16 MOV eTST4, NEXT 
;R1_ CONTAINS BASE DMC11 ADDRESS 
012456 104412 MSTCLR MASTER CL EAR OMC11 
012460 Ol2702 000013 MOV #13,Re SAV — Re FOR T PEOUT 
012464 104414 ROMCLK "NEXT WORD IS INSTRUCTION, ROMCLK PC=S204 
012466 021264 021004! «20#13> ;PORTY*LINE UNIT REG 13 
012470 016104 o00004 MOV 4(RI).RY :PUT " "IN RY 
012474 o4e704 009213 BIC #213,R4 CLEAR UNKNOWN, BITS 
012500 O1e70S 000150 MOV #100'R8S :PUT “EXPECTED” IN RS 
012504 120S04 CMPB sR, RG :ARE RING, DTR, AND MODEM READY SET” 
012506 901401 BEQ 1$ :B YES 
012510 104 HLT 2 ‘ERROR IN LU 13 
012512 104400 18: SCOPE : SCOPE THIS 1E81 
; RERREELERELERARERRREREEEERE TEST 4 SeeeEREEE REESE TEPER EASE EES 
!¥MAINTENANCE REGISTER READ/ONLY TEST 
:#D0 A MASTER CLEAR. VERIFY THAT ALL READ/ONLY 
s#81TS ARE IN THE CORRECT STATE 
MTs Eenatekumnalustentiantenstandannibenieasaaeebueeiiiensnid 
; TEST Y 
012514 012737 900004 001226 TST4: Mov #4, TSTNO 
012522 012737 Olebls OOlelé MOV aTSTS NEXT ie" 
:R1 CONTAINS BASE DMC11 ADDRESS 
012530 104412 MSTCLR :MASTER CL EAR DMC 11 
012532 Ol2702 o00017 MOV #17,R2 :SAVE Re FOR TYPEOU A 
012536 104414 ROMCLK ‘NEXT WORD IS INSTRUCTION, ROMCLK PC=53C4 
012540 021364 021004! «20#17> ;PORTY+L INE UNIT REG 1 
012542 016194 co0004 MOV 4(R1),R4 :PUT 
012546 042704 900206 BIC #206, RY :CLEAR UNKNOWN ‘Bits 
012552 912705 900051 MOV #51,RS : PUT TEXPECTED” IN RS 
012556 032737 920000 001366 BIT #81T13,STATL 15 LU AN MB8eO2 OR M8201” 
012564 001004 BNE F 
012566 032737 O40000 001366 BIT #BIT14,STATL | :CONNECTOR?? 
012574 001004 BNE :BR IF nee01 WITH CONNECT al 
012576 O42704 oO0040 23: BIC #40, R4 :MASK OFF et BIT af mge0e2 oR M8201, NC CONNECTOR 
Sieb0e 042705 occ040 * BIC #BItS,RS :S] BIT IS UNKNO 
012606 120504 CMPB sdaRS, RH :ARE SI AND ICIR SET? 
012610 001401 BEG 1$ :BR IF YES 
Ole612 104002 HLT 2 ‘ERROR IN LU 17 
012614 104400 13: SCOPE :SCOPE THIS TEST 


SRERERERRE KERR SARS ARRERRSEEL TEST S Setaeataeearataseaeereserer 
i #LINE UNIT REGISTER WRITE/READ TEST 

-#SET BITS IN LU REGISTER l2, VERIFY IT IS SET 

:ACLEAR BITS IN LU REGISTER 12, VERIFY IT IS CLEAR 


PETE PTTTTTETECTCCTTCCTTTCTTTETTTOTITITETTTT SITET TTT TTT ttt tt tt 
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DZOME.P11 12-MAY-77 14:18 LINE UNIT WRITE’READ TESTS 

1275 ; TESTS 

1558 Qisees OLsra? Olerse posi STs: OST ear 

(¢ ¢ 

1ocg piss piss ? pts eae 54548 MOV #1$, LOCK 

1780 ;R1 CONTAINS BASE DMC11 ADORESS 

1781 012640 104412 MSTCLR -MASTER CLEAR DMC11 

1782 Oleb¥e 012702 oo00012 MOV #12,R2 : SAVE REGISTER ADDRESS FOR TYPEOUT 

1783 012646 01276! O00040 900004 1$: MOV #40, 4(R1) tL LOAD PORTY 

1784 012654 104414 ROMCLK NEXT WORD | Is INSTRUCTION, ROMCLK PC=S304 

1785 Ol 122112 l221l2 j SET BITS I le ; 

1786 012660 104414 ROMCLK : NEXT WORD Is” INSTRUCTION, ROMCLK PC=S304 

1787 Olebbe 021245 021245 iRE 

1786 012664 O12705 o00040 MOV : PUT “EXPECTED” IN RS 

1789 012670 116104 o00005 MOVB Hehe RY :PUT “FOUND” IN RY 

1790 012674 042704 900337 BIC #337,R4 -CLEAR UNWANTED BITS 

1791 012700 120504 CMPB sR, RG 31S BITS SET? 

1792 012702 001401 BEQ 2 R IF YES 

1793 012704 104003 HLT 3 “ERROR, BIT S IS NOT SET 

1794 012706 10440 23: SCOP iC nen 81 (SWO9=1 ) 

1795 012710 012737 012716 901220 MOV 83$, LOCK 

179% 012716 o0S061 ooco04 3S: CLR 4(RI} 

1797 Ol2722 104414 ROMCLK NeXT w9RD BINS INSTRUCTION, ROMCLK PC=S304 

1798 012724 122112 leelle : CLEAR 

1799 912726 «104414 ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 

1800 012730 021245 021245 READ le 

1801 012732 o05005 CLR RS : PUT “EXPECTED” IN RS 

1802 012734 116194 oo000S MOVB  S(R1),RY ;PUT “FOUND” IN RY 

1803 012740 O42704 000337 BIC #337, R4 ‘CLEAR UNWANTED BITS 

1 012744 120504 CMPB sR, RG :I§ BITS CLEAR? 

1805 01274% 001401 BEG $ -BR IF- YES 

1806 012750 104003 HLT 3 :ERROR, BITS IS NOT CLEAR 

1807 012752 104401 43: SCOP1 :SCOPE SUBTEST (SWO9=1) 

1808 012754 104400 SCOPE :SCOPE THIS TEST 

1810 

1811 j RRRERRERRRERRERRRRREREEERE TEST & SkeReeERRERRERE SAREE RETEE 

18le :#LINE UNIT REGISTER WRITE’ REA D TEST 

1813 :*#SET BIT1 IN LU REGISTER VERIFY IT IS SET 

1814 :#CLEAR BIT1 IN LU REGISTER "Ip VERIFY IT IS CLEAR 

Bie i acseosesdnsesnuteontessaazesubuscanounscessercscssonasassouess 

1817 ; TEST 6 

1619 Ole 012737 OOCOO& od01226 TST: MOV 86, TSTNO 

1820 012764 012737 O13116 O01216 MOV aTST?, NEXT 

1821 012772 012737 013006 001220 MOV #18, LOCK 

1822 Rl CONTAINS BASE DMC11 ADDRESS 

1823 013000 104412 MSTCLR :MASTER CLEAR DM 

1824 013002 012702 ofo017 MOV #17,R2 : SAVE REGISTER ADDRESS FOR TYPEOUT 

1825 013006 012761 000001 ocoD004 1$: MOV #1,4(R1) :LOAD PORTY r 

1826 013014 104414 ROMCLK : NEXT WORD Is INSTRUCTION, ROMCLK PC=S304 

1827 013016 122117 122117 :SET BIT 

1828 013020 104414 ROMCLK :NEX XT WORD. Is” INSTRUCTION, ROMCLK PC=S304 

1829 013022 021365 021365 U- 

1630 013024 012705 oooool MOY #1,RS PUT "EXPECTED" IN RS 
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1831 013030 116104 000005 MOVB  S(R1),R4 ;PUT “FOUND” IN R 

1832 013034 042704 000376 BIC #376, R4 : CLEAR UNWANTED BITS 

1833 013040 120504 CMPB sa, RG :IS BIT1 SET? 

1834 013042 001401 BEQ 2$ :BR IF YES 

1835 013044 104003 HLT 3 :ERROR, BIT 1 IS NOT SET 

1836 013046 104401 2$: SCOP ; SCOPE SUBTEST (SWO9=1) 

1837 0130S0 012737 013056 901220 MOV #3$, LOCK ‘NEW SC OPI 

1838 013056 005061 000004 33: CLR 4(R1) :LOAD PORT 

1839 013062 104414 ROMCLK NEXT WORD” IS INSTRUCTION, ROMCLK PC=5204 

1840 013064 122117 122117 i CLEAR BIT 1 IN ? 

1841 013066 104414 ROMCLK NEXT WORD , c INSTRUCTION, ROMCLK ©C=5204 

1842 013070 021365 021365 T=EXpe 

1843 013072 005005 CLR RS ime XPECTED” IN RS 

1844 013074 116104 oo0005 MOVB  S(RI),RY :PUT “FO IN RY 

1845 013100 942704 000376 BIC #376, R4 :CLEAR_ UNWANTED BITS 

1846 013104 1 CMPB sd, RG ;1S BIT1 CLEAR? 

1847 013106 901401 BEQ 4§ YES 

1848 013110 104003 HLT 3 :ERROR, BIT1 IS NOT CLEAR 

1849 O13112 10440] 4$: SCOP :SCOPE SUBTEST (SWO9=1) 

1850 013114 104400 SCOPE :SCOPE THIS TEST 

ieee 

18S3  REREEEREAEE ESSERE EEL EEE EE Tes! 7 RERRREEEESESE E455 4594442444 

1854 '#LINE UNIT REGISTER WRITE/READ TEST 

1955 :#FLOAT A 1 THROUGH LINE UNIT REGISTER 13 

1856 s#F CORT A O THROUGH LINE UNIT REGISTER 13 

124 sSSRERASRAASALAAALESAAFALAARALALALLFAAALAAREFAAELELALASAREL PALES 

1859 ; TEST 7 

oO Se Sl as eer eee)! eee 

186i 013116 012737 900007 onl!e26 TST7: Mov TNO 

1862 013124 012737 013326 O0l216 MOV erario NEXT 

1863 013132 012737 013152 901220 MOV #64$, LOCK 

1864 ;R1 CONTAINS BASE DMC11 ADDRESS 

1865 013140 104412 MSTCLR "MASTER CLEAR 

1866 013142 012702 000013 MOV #13,R2 : SAVE REGISTER ADORESS FOR TYPEDL 

1867 O13146 912700 000001 MOV #i,R0 :START WITH BIT O 

1868 9013152 4S: 

1869 013152 o90004 MOV RO,4(RL) :PUT PATTERN INTO PORTY 

1870 013156 042761 000257 oo0004 BIC #267. 4(R1) “CLEAR UNWANTED BITS 

1871 013164 104414 ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=530 

1872 013166 122113 122100!13 V DATA TO IBUS REGISTER 13 

1873 013170 104414 ROMCLK NEXT WORO IS INSTRUCTION, ROMCLK PC=5304 

1874 013172 O21265 21005! < 13#20> :READ FROM IBUS REGISTER !3 

1875 013174 O10005 MOV RO.RS :PUT EXPECTED IN RS 

1876 013176 042705 000257 BIC #257. RS :CLEAR UNWANTED BITS 

1877 013202 116104 900005 MOVB  S(RIS.RY :PUT “FOUND” INTO RY 

1878 013206 704 900257 BIC #257. RY ?CLEAR UNWANTED SITS 

1879 O13212 4 CMPB S.R4 :DATA CORRECT? 

1880 013214 001401 BEQ $ :8R IF YES 

1881 013216 104003 HLT 3 ; ERROR 

1882 013220 104401 S$: SCOP! : SWO9=1? 

1983 013222 41 ELC :CLEAR CARRY 

1684 013224 10€100 ROLE Ss :SHIFT BIT IN RO 

1885 013226 00136) BNE b4$ :IF RO=O THEN DONE 

1886 013230 612737 013244 oO1z220 MOV 8673,L06+ :NEW SCOPL 
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1887 013236 012700 000001 MOV #1,RO :START WITH BIT O 

1888 013242 005100 69$: COM RO “CHANGE TO FLOATING ZERO 

1889 Oi ze44 67: 

1890 013044 900004 MOV O.4(R1) :PUT PATTERN INTO PORTH 

1891 013250 042761 000257 900004 BIC Boe? 4(R1) :CLEAR wrrise 

1892 013256 104414 ROMCLK WORD 1S iret AUCTION, ROMCLK PC=S304 

1833 b13¢60 122113 4e2100!13 1 oF ATO! E 

l 1 109414 OMCLK NEXT CHORD IS INSTRUCTION, Jfémcux e¢=5304 

1895 013264 021265 21005! «13#20> READ FROM M IBS REGISTE 

189% 013266 010005 MOV RO.RS ‘PUT EXPECT 

1897 013270 O4270S 000257 BIC #257. RS :CLEAR UNWANTED BITS 

1898 013274 116104 0090005 MOVB (RL) RY ‘PUT “FOUND” INTO RY 

1899 013300 O42704 000257 BIC #257, R4 ‘CLEAR UNWANTED BITS 

1900 013304 120504 CMPB =e RS. RG :DATA 

1901 013306 001401 BEG 6a$ “BR IF YES 

1902 013310 003 HLT ‘ERR 

1903 013312 104401 683: SCOP : SWO9=1? 

1904 013314 005100 COM RO “CHANGE TO FLOATING ! 

1905 013316 4 CLC : CLEAR 

1906 913320 106100 ROL8 RO :SHIFT BIT 1N RO 

1907 013322 001347 BNE 69S !IF RO=0 THEN DONE 

1908 013324 104400 SCOPE :SCOPE THIS TEST 

1910 

iSil SRERLSRARRAEARRRRRRREFEEEEE TEST 10 eebtteteteeesesssseesesreses 

1912 !#LINE UNIT REGISTER WRITE/READ TEST 

1913 :#FLOAT A 1 THROUGH LINE UNIT REGISTER 14 

1924 ser LORT A O THROUGH LINE UNIT REGISTER 

1ate ee Bi aes ee ae ll A TE 

giz ; TEST 10 

1919 013326 012737 900010 90!226 TST10: MOV #10. TSTNO 

1920 613334 012737 613502 O0le!6 MOV sTSt11 NEXT 

1921 013342 012737 013362 001220 MOV #64$, LOCK 

1922 ;Ri CONTAINS BASE DMC11 ADDRESS 

1923 013350 104412 MSTCLR MASTER CLEAR DMC1 

1924 913352 O12702 900014 MOV #14, R2 CAVE REGISTER AGORESS FOR TYPEOUT 

1925 013356 012700 90000: MOV #1,R0 ‘START WITH BIT O 

1926 013362 64S: 

1927 013362 010061 oco004 MOV RO,4(R1) :PUT PATTERN INTO PORT 

1928 013366 104414 ROMCLK :NEXT WORD IS INSTRUCTION ROMCL Po=S204 

1929 013370 122114 122100!14 :MOY DATA TO IBUS REGISTER ! 

1930 013372 104414 ROMCLK :NEXT WORD IS INSTRUCTION ROMCLK P225304 

1931 013374 021305 1005! « 14420, READ FROM IBUS REGISTER {4 

1932 013376 o10005 MOV R :PUT EXPECTED b iN RS 

1933 012400 116104 00005 MOVB oS al. RY :PUT “FOUND” 

1934 013404 120504 CMPB soRS_R4 :DATA CORRECT? 

1935 013406 001401 BEQ 6s :BR IF YES 

1936 013410 104003 HLT 3 ERRO 

1937 013412 104401 S$: SCOP 1 : SWO9=1? 

193€ 913414 00024) eLe :CLEAR CARRY 

1939 013416 106100 ROLB = RO :SHIFT BIT IN RO 

1946 013420 001360 BNE 64S :IF RO=O THEN DONE 

1941 012422 012737 013436 01220 MOY 86 7S, LOCK :NEW SCOP 

i942 013430 012700 9800001 MOV #1,R0 :START WITH BIT 0 
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11:59 PAGE 39 
LINE UNIT WRITE/READ TESTS 


69$: 
67$: 


68$: 


TSTll: 


TSTle: 


PAGE: 


COM RO -CHANGE TO FLOATING ZERO 
MOV RO,4(RL) iP I Par RN INTO PORT4 
MCLK T WORD IS I TRUCTION ROMCLK PC=S304 
122100!14 + hOV DATA TO 18US REGISTER 14 
RONCLK !NEXT WORD IS INS STRUCTION, | ROMCLK PC=5304 
21005!«14*20> ‘READ FROM 
MOV RO, RS ‘PUT EXPECTED IN RS 
MOVB  S(R1),R4 :PUT “FOUND” INTO RY 
CMPB RY !DATA CORRECT? 
BEG g : YES 
HL } 
SCOP1 . : SWO9=1 
COM RO : CHANGE "10 FLOATING 1 
CLC :CLEAR CARRY 
ROLB = RO : SHIFT BIT IN RO 
BNE 69$ !IF RO=0 THEN DONE 


:SCOPE THIS TEST 


TEST 
ADS SWITCH PAC#l 


5 RERERLEAAALELELAAARASLALELALERALLAARALARAAALERALLFALEAELELAFES 


; TEST 11 
Mov #11, TSTNO 
MOV #TSt12, NEXT 
;R1 CONTAINS BASE OMC11 ACORESS 


MSTCLR :MASTER CLEAR DMC11 
ROMCLK ZNEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
021304 ;PORTeLU US 

= T FOUND" IN R4 

MOVB © STAT2.. RS ‘PUT “EXPECTED” IN RS 

CMPB ORS, RY :SW WOK” 

Bois BRI 

HT 31 ERR R, ‘SulTCH PAC READ ERROR 

SCOPE :EEOPE TRIS fest 


pore ay go rece TEST 12 #e#eeeeeeeeeeeeeeea reser senses 


aie? fest RE fe SWITCH PAC#2 
is THIS SWITCH PAC CONTAINS THE BMS73 BOOT ADD 
s RERRERARES RAE SRAR SE REAER SEALERS EARRAL RELA EASE FAR AAT RE LASDORE 


; TEST le 
hov #12, TSTNO 
MOV 875713, NEXT 
si CONTAINS, BASE OMC11 ADDRESS 


MSTCLR TER CLEAR OMC11 
ROMCLK sNEXT WORD IS INSTRUCTION, ROMCLA PC=530% 
O21344 -PORTYeLUIE 


ooss 


IQ5 
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DZDME.P11 12-MAY-77 14:18 LINE UNIT WRITE/READ TESTS 
999 01 01 0 MOV 4Y(RL),RY :PUT “FOUND” IN R 

$338 Bt 3288 reheat sabes MOVB STATe+1 RS ‘PUT “EXPECTED” tN SE 
2001 9O13S76 120504 CMPB RS,R4 : SW OK? 
2002 013600 001401 BEQ 1$' " <BR IF YES 
2003 013602 104031 HLT 31 :ERROR, SWITCH PAC READ ERROR 
2004 O13604 104400 1$: SCOPE :SCOPE THIS TEST 
2006 
2007 ete ITT CLOCK TeeT TEST 13 RERFLSLAAAALSSAFFAFFLELASSE 
2008 "LINE UNIT CLOCK TEST 
2003 :#THIS TEST VERIFYS THAT M3 LU INTERNAL CLOCK 
2010 #617 1 IN LU-17) IS WORKING 
Ate s REREREARASLARASLALESA SLE AE LEELA SAA AAAS ASSESS AAAFARA SHALL ASF FLSS 
213 ; TEST 13 
€ cee eS eH OH ee ee OK 
2015 O13606 012737 000013 O0iz26 TST13: Mov #13, TSTNO 
2016 013614 012737 013706 O01216 MOV #TST14, NEXT 
2017 :R1 CONTAINS BASE DMC11 ADDRESS 
2018 013622 104412 MSTCLR :MASTER CLEAR DMC11 
2019 013624 005037 o0!4!6 CLR TEMP :PREPARE FOR DELAY 
cos) faesy 104414 aa ROMCLK XT WORD IS INSTRUCTION, ROMCLK PC=S304 

Bt 3P30 soy sed 021364 ENT wORO an art 
2023 013634 032761 oo0002 of0004 BIT #2,4(R1) :1S CLOCK BIT SET? 
sp5e pte ag BHegos OO141E BNE MP : EA bees 
208 013650 ob! ” BNE is : DELAY FtNISHED? Sonne 
5852 Bt 326 Apeeo> OOL41E 2s: CLR TEMP + BRE PRRE- Foe°p LAY 
2029 013660 38: 
2030 013660 104414 ROMCLK ; NEX xT toro 3 INSTRUCTION, ROMCLe PC=5304 
seas GLaees Bl . ed ee 

13664 61 goc002 900004 e #2,4(R1) 1S crock “BIT CLEAR? 
2033 O1%7¢ 001404 aiiek BEG - i :BR IF YES 
Shae 13700 Be Se> BNE ¥ i PELOE F DELAY NOT DONE 
2036 913702 104004 HLT 4 :ERROR BIT IS STUCK SET 
2037 013704 104400 4$: SCOPE 
ee 
3040 j RERRAERAAELAEAALERALE AERA RE TEST 14 HeeRReRaRERSSSRELETLAAAP REE 
204! :#0UT DATA SILO TEST 
55 Be POM ny SCOR. SET. INDICATING. THAT THE 
Bat ACTER IS COR OE bot? M OF THE OUT SILO 
ta ap etc al FE I ll Ml BL St RN 
Ba ; TEST 14 
Fe 43 013706 012737 oc0Cl4Y 001226 TST14: MoV #14, TSTNO 
2050 013714 012737 O14022 OOl21e MOV aTST1S, NEXT sa sadalinn ‘ona Mati detec 

L 

Be 013722 104412 MSTCLR inate CLE ERD 5 .es aes 
20 013724 005061 oo0004 CLR 4(R1) 


e0S4 013730 04414 ROMCLK NEXT WORD 1s INSTRUCTION, ROMCLK PC=5304 


JOS 


OZDMF MACYL] 30(10%6) Ll-JUL-77 11:59 PAGE 41 j PAGE: O06 
DZDME.P11 12-MAY-77 14:18 BASIC TRANSMITTER TESTS 
? 2117 117 PUT_L NIT IN BITSTUFF MODE 

o3ee sera b6s)47 33374 +8 PS CLRIO 160 TH bide AP Fe MG Ig a 

13740 O1e711 904000 MOV ebtfT1 (RL) T LINE 

l 012761 000001 o00004 MOV 1,4¢R1) Cong PORTS” AIH oF ro 
2059 013752 104414 ROMCLK “NEXT WORD IS INSTRUCTION, ROMCLK PC=S3204 
2060 013754 122111 122111 OM 
2061 013756 104414 "AMCLK :NEXT WORD 1S INSTRUCTION, ROMCLK PC=5204 
2062 013760 122110 110 “LOAD OUT DATA SILO 
2063 01376¢ 10441 gog902 eR, 2 “WAIT FOR OCOR 
2064 013766 Ole70e O0001 muv $17,Re ; SAVE ADDRESS FOR TYPEOUT 
2065 013772 104414 ROMCLK NEXT WORD Is INSTRUCTION, ROMCLK PC=5204 
2066 013774 021364 021364 :PORTH*LU 17 
2067 013776 016104 o00004 MOV 4A) RY :PUT “FOUND” IN RY 
2068 O14002 O42704 000357 BIC 7,84 -CLEAR UNWANTED BITS 
2069 O14006 O1e70S 000020 MOV : PUT “EXPECTED” IN RS 
2970 O140l2e 120504 CMPB , dts -1S OCOR SET? 
2071 O14014 9001401 BEG :BR IF YES 
2072 O14016 104c05 HLT i 
2073 014020 1$: 
2074 014020 104400 SCOPE :SCOPE THIS TEST 
ae : 
2077 5 RRLRRAERAALRAARRSREREEEREEE TEST 15 FRReeeeeee sees t eee tessa tees 
2078 ; #BITSTUFF TEST OF RTS AND OUT ACTIVE 
2079 -*#SET SOM AND LOAD OUT DATA SILO 
2080 ; #SINGLE STEP 2 DATA CLOCKS, VERIFY 
2081 ;#THAT RTS AND ACTIVE ARE SET 
Spes se ceukacoecksdebearaucconscuassesepencosssusunscacuascscees 
2084 ; TEST 15 
2086 O14022 012737 OO0CIS o01226 TST1S5: MOV #15, TSTNO 
2087 O14030 012737 O14174 OOl216 MOV #TST16, NEXT 
2088 Sekai elevate slit CONTAINS BAS BASE prea ADDRESS 
5 584 014040 oO0S061 o00004 CLR 4¥(R1) CLEAR POR ora A 
oe tee [eis ey oy ihe ner ia gtiatape fooe* 
spas Bt apes A549 49 033374 +86 PC, CLRIO 00 tf REED MODE 
2094 014054 012711 oO4000 MOV eo fT11 | (71) 
2095S 014060 012761 900001 oD0004 MOV 1,4¢R1) it LENE aN Mer tare Tg 
303 014066 104414 ROMCLK iNEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
5 atts ate Aan k a NSTRUCTION, ROMCLK PC=5304 

MCL ; ¢=530 
obeg pty 74 122110 leelIo ea our our pata’ e483 
Sa Sisige fowls HERR Beacux, ei a 
LK, 

5t8s 5141 403343 BB il MOV #11,R2 chee parks Eon HEP our 
103 OINi ie O44 ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
5i8e 14116 neste 000004 MOV 4¥(R1),RY :PUT 55 , IN RY 
2106 Ol4le2 O42704 000257 BIC #257,.R4 :CLEAR UNWANTED BITS 
2107 O141e6 Ole70S 900120 MOV #120, RS PUT “EXPECTED” IN RS 
2108 014132 120504 CMPB oR, R4 :1S ACTIVE SET? 
2199 014134 001401 BEG 1$ :BR IF YES 
2110 O14136 104005 HLT 5 


KOS 


OZOMF MACY11 30(1046) Ll-JUL-77 11:59 PAGE Ye PRGE: O0062 
DZOME.P11 12-MAY-77 14:18 BASIC TRANSMITTER TESTS 
Bia}de 1$: 
4140 Q12702 000013 MOV #13,Re forge | ADDRESS FOR TYPEOUT 

i Oi4144 104414 ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=5204 

114° «~O141 Matt 021264 ; PORT expec 13 

11S O14] 161 000004 MOV 4(Ri) RY :PUT E D_IN RY 

116 014154 042704 900337 BIC #337, RY ;CLEAR UNWANTED BITS 

117 014160 012705 009040 MOV BITS RS sPUT a el IN RS, RTS SHOULD BE SET 

118 Q14164 120504 CMPB RS,R4 

119 014166 001401 BEQ 2s ‘aR fF YES 

1 014170 104005 HLT S ;RTS ERROR 


014172 2s: 
014172 104400 SCOPE ;SCOPE THIS TEST 


20 

21 

ee 

s 

2s ; RRRRRRERRRRRRRRERRRRRREEERE TEST 16 seeeeeeeseeeseeeeeeeseeeess 
2b !¥TEST OF OUT CLEAR 

27 :¥SET SOM AND LOAD OUT DATA SILO 

28 : SINGLE STEP BATA CLOCK, SET OUT CLEAR 

293 #VERIFY THAT OCOR,RTS. AND ACTIVE ARE CLE 

3 
32 
33 


rururu Pururorulre fururuorunorurururrururu furore 
0 b= bs p= be pe he 


l 

i eanennaceseussaebansbasnsessaasbenasustesresvenseuencesscuenes 

; TEST 16 

134 O14174 012737 O00016 001226 TST16: MOV #16. TSTNO 

136 O14e02 012737 O14406 BBISTE MOV nee] ,NEXT 

i ;R1 CONTAINS BASE MCL ADDRESS 

2137 Ol4210 104412 MSTCLR sMAS ASTER, CLEAR DMC1 

e138 Oiveie 005061 oo0004 CLR 4(R1) 

21 14216 109414 ROMCLK REST WORD IS INSTRUCTION ROMCLK PC=5204 

2140 014220 122117 122117 ;PUT LINE UNIT IN BITST UEF MODE 

2141 Ol4222 004737 03237 JSR LRIO :D0 THIS AFTER MODE I 

el42 Ol4e26 012711 O04000 MOV Netti (RL) :SET LINE UNIT L 

2143 914232 012761 900001 ooD004 MOV #1,4(R1) ‘LOAD PORTY WITH BITO 

2144 014240 104414 ROMCLK ;NEX T WORD IS INSTRUCTION, ROMCLK PC=5304 

2145 Ol4e42 12211) leeli1 OM 

2146 O14244 104414 ROMCLK NEXT WORD 1S INSTRUCTION, ROMCLK PC=5204 

2147 O1424%6 122110 122110 sL 08D OUT DATA SILO 

2148 014250 004737 932044 ISR PC,OCOR WAIT FOR OCOR 

2148 014254 104415 d00002 DATACLK, 2 :CLOCK DATA FOUR TIMES 

5190 14g60 012761 p09200 900004 MOV #B1T7,4(R1) : SET yeiT7 IN PORT 

et i O14 10814 ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=S204 
1 

2163 14872 Sadie 99990} ABP AREY 1 Set ries TO CLEAR RTS 

154 014276 012702 000017 MOV #17,Re SAVE ADDRESS FOR TYPECUT 

2155 014302 104414 ROMCLK NEXT WORD Is INSTRUCTION, ROMCLK PC=S304 

2156 014304 021364 021364 :PORTYeL 

2157 014306 016104 o00004 MOV 4(R1L).R4 : PUT Serbian IN 

2158 O143le O42704 900357 BIC 8357,R4 ;CLEAR UNWANTED Str S 

2159 01431 os CLR RS :PUT “EXPECTED™ IN RS 

21 14 rea CMPB ORS. RY ?I§ OCOR CLEARED? 

2161 014322 001401 BE 1$ :BR IF YES 

2l6e O14324 104005 HLT c 

2163 014326 18: 

2164 O14326 012702 oc0012 MOV #13, R2 ;SAVE ADDRESS FOR TYPEOUT 

el6S 014332 104414 ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 

2166 014224 621264 921264 -PORTH¢LU 13 


LOS 
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DZDME.P11 12-MAY-77 14:18 BASIC TRANSMITTER TESTS 
2167 014336 016104 000004 MOV 4(RL) RY :PUT EXPECTED IN RY 
SMC? ano eel Bic 8397, RY CEPR UDECTED™ IN RS, RTS SHOULD BE CLERREC 
188 Bidsce 9SRRRs He ORE, RY Te Te OKS 
2171 0143S2 001401 BEQ 2$ :BR IF YES 
172 14354 104005 HLT 5 :RTS ERROR 
17 14396 2s: 
174 O14 012702 000011 MOV #11,R2 ;SAVE ADDRESS FOR TYPEOUT 
2175 014362 104414 RONCLK sNEXT WORD IS INSTRUCTION, ROMCLK PC=S204 
5125 Bidsee BFETBY oocoos aBy 4cR1) {BOY EBUNR® IN RY apg 
4 M 4 R L 
S158 AidasE PARcRG 000e0 Hebe «= «ABT AY RS cA Eta 
2180 014400 001401 REQ 3$ YES 
2181 ais 104005 =. HLT S s ERROR ACTIVE NOT CLEARED 
sies 14404 104400 SCOPE :SCOPE THIS TEST 
ae 
2186 ; RERRELRLRLEAREL EARL EERE EELS TEST 17 £HRHRHSAAEAESSSELSSELELELELS 
2187 !#BITSTUFF TRANSMITTER TEST 
2188 !#SINGLE CLOCK THE CHARACTER 0 
2189 :#CHECK FLAG AND DATA IN THE BIT WINDOW 
2190 !eVERIFY EACH BIT POSIT ION AS I 
2191 :#PASSES THE BIT WINDOW (SI SIT) 
2192 $80 AN ERROR, R3 CONTAINS BIT POSITION OF FAILURE 
Sigs SOT PELE eT EE TTTTETTESTTeTSeTTerTeTererer ret Ter rt rere: 
ei3s ; TEST 17 
2197 O14406 012737 O00017 oc01226 TSTi7: MOV #17, TSTNO 
2198 O14414 612737 014670 001216 MOV #TSt20, NEXT 
2199 :R1 CONTAINS BASE ONC LI ACORESS 
2200 ol44e2e 104412 MSTCLR MAST ER CLEAR OMC11 
2201 014424 605061 O00004 CLR 4(RL) CLEAR 
eede p44 104414 ROMCLK : NEXT WORD. is INSTRUCT jou, 8 ROMCLK Pc=5304 
14432 122117 leeli7 :PUT LINE UNIT IN BITSTUF 
2204 014434 004737 933374 ISR PC, CLRIO :DO THIS AFTER MODE IS SET 
2205 O14440 005037 033612 CLR BItCON :CONSECUTIVE 1°S COUNTER INIT TO 0 
2206 O14444 012711 O04000 MOV #BIT11,(R1) :SET_LINE UNIT LOOP 
2207 O144S50 004737 032176 JSR PC, OUTRDY WAIT FOR QUT-RERDY 
2208 O14454 01276: 000001 000004 MOV #1 /4(R1) :SET BITO IN PORTY j 
2209 O14462 104415 ROMCLK iNEX XT WORD IS INSTRUCTION, ROMCLK PC=S304 
2210 O14464 122111 122111 OM! 
2211 O14466 104414 ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
2212 014470 122110 122110 GARBAGE CHAR 
2213 014472 012705 ooD000 #O,RS ;LOAD CHARACTER IN RS FOR TYPEOQUT 
2214 014476 004737 932176 JSR PC’ OUTRDY ;WAIT FOR OUT-READY 
2215 O14S02 010561 O00004 MOV RS‘4(R1) i LORD PORTY WITH CHARACTER 
2216 O14506 1044 ROMCLK "NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
2217 O14510 le2eli0 122110 ‘LOAD OUT DATA 
2218 014512 032044 JSR PC,OCOR :WAIT FOR OCOR TO SET 
2219 O14S16 CLR R3 :CLEAR BIT COUNTER 
22e0 014520 010502 MOV RS,R2 :LORD CHARACTER IN Re 
2221 O14Se2 104415 oo0002 DATACLK, z TICKS TO SET UP TRANSMITTER 
cece 14526 012737 OC017E oD1es2 MOV etB<Ql111110>, rete “PUT FLAG CHARACTER IN TEMP2 


mm re rr a re me mm 


DZOMF MACY we tLe 
DZOME.P11 12-MAY-77 14 
cca 8 tas 104415 

cae 106037 
S eS ie 
103006 
O14SS4 104026 
014556 
2230 014560 004737 
2231 O14S64Y 1 l 
22 Bt 
ee 145 
se ae re 
2236 BL4E8 005003 
2237 014602 104415 
2238 014606 106002 
2239 014610 103005 
2240 Ol46!e 004737 
2e41 O14616 103406 
2e4e 014620 104006 
2e43 Ol46ee OO00404 
2e44 014624 004737 
2e45 014630 103001 
2e% 014632 104006 
224? 014634 
2ee48 014634 
2249 014636 022703 
2eeSO O1464e 001357 
22S! O14644 104415 
2eSe 014650 104414 
2eS3 O146Se Oeleb 
2254 O14654 032761 
eeSS 014662 9001401 
eeSé 014664 104034 
eeS7 O14666 104400 
2eS8 
2259 
2260 
2261 
eebe 
ecb3 
2264 
226s 
ecbe 
e267 
ecbe 
e269 
ec70 
ee71 014670 012737 
ee7e O14676 012737 
e273 
ee74 014704 104412 
ee75 014706 005061 
ee 014712 104414 
ee 014714 122117 
2e78 O14716 004737 


ll-JUL-77 11:59 PAGE 4 PAGE: 
:18 BASIC TRANSMITTER TESTS 
000001 64S: DATACLK, l ;CLOCK FLAG ONCE 
001252 RORB  =TEMP3 : SHIFT SOFT BLAS 
BCs ges :BR IF IT 5M 
032012 JR Pu ,ceTSI ; LOOK AT BI WINDOW 
HLT eb ‘ERROR IN FLAG CHAR 
032012 658: JSR PC, GETSI ;LOOK AT BIT WINDOW 
BCS b6$ ‘BR IF OK 
HLT 26 :ERROR IN FLAG CHAR 
66S: INC RG “INC BIT COUNT 
009010 CMP #10,R3 :FLAG DONE YET? 
BNE 64S ;BR_IF NO 
LR “CLEAR BIT 
000001 1$: DATACLK, 1 ‘SHIFT NEXT BIT IN THE WINDOW (SI BIT) 
RORB 2 HIFT NEXT N TO CARRY 
BCC 2g BR IF CARRY 
032012 JSR PC, GETSI ;GET THE WINDOW 
BCS 3$ -BR IF BIT IS A MARK 
HLT ;ERROR BIT WAS A SPACE 
BR 3$ :CONTINE WITH TEST 
032012 2s: ISR PC, GETSI ;GET THE WINDOW 
BCC 3$ -BR IF BIT IS A SPACE 
- H :ERROR BIT WAS A M 
IN ;NEXT BIT 
000010 MP #10,R3 ;DONE _YET? 
8 :BR IF NO 
000014 DATACLK, 14 5 CLOCK TRANSMITTER 14 MORE TICKS 
ROMCLK !NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
021264 ;PORTHeLU-13 
oooo40 ooc904 BIT #BITS,4(R1) RTS SHOULD BE CLEAR NOW 
BEG 4g ‘BR IF 
HLT 34 ERROR, "RTS NOT CLEAR 
4g: SCOPE :SCOPE THIS TEST 
rr poe TEST OD HexRRSRSSEESEASSRASARAESRED 
:#BITSTUFF TRANSMITTER TEST 
?#SINGLE CLOCK THE CHARACT ER 125 
:#CHECK FLAG AND DATA IN THE att WINDOW 
:#VERIFY EACH BIT POSITION AS IT 
:#PASSES THE BIT WINDOW (SI BIT) 
ON AN ERROR, R3 CONTAINS BIT POSITION OF FAILURE 
PPVEEETECTCTTTTSTOSTUTETETTTCTOCSTTCCTCCTOSTCCCTCTTS TST CCT CTT SS 
; TEST 20 
o00020 90122 TST20: Mov TSTNO 
015152 OOl2le MOV sretat NEXT 
;R1 CONTAINS BASE DMC11 ADDRESS 
MSTCLR :MASTER CLEAR DMC11 
oo0004 CLR 4(R]) ;CLEAR PORT 4 
ROMCLK XT WORD IS INSTRUCTION ROMCLK PC=S304 
122117 :PUT LINE UNIT IN BITSTUFF MODE 
023374 ISR PC,CLRIO DO Th HIS AFTER MODE IS SET 


MOS 
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O7OMF _ MACY11 30(1046) 11-JUL-77 11:59 PAGE 45 PAGE: c 
Rhee Plt iz B41 038 ratte Bath tRANSMITTER TESTS — 
2279 14722 o0s037 033612 CLR TCON aa: : CONSE ECUTIVE 1's COUNTER INIT TO 0 

se ire Bier BOR Gh BTS Ma 

147 12761 1 00004 MOV iSET BITO IN PORTY 

2283 O14744 104414 ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
2284 O14 122111 le2ii1 ; 

2285 O14 104414 XT BORD IS INSTRUCTION, ROMCLK PC=S204 
SSe> Biased bi ehbs 456110 FoR 

14754 Oi 000125 V #125,RS ;LOAD C IN OR TYPEOUT 

2288 O14760 004737 032176 JSR PC, OUTRDY ;WAIT FOR OUT-READY 

2289 014764 010561 OO0004 MOV RS'4(R1) ‘LOAD PORT4Y WITH CHARACTER s 
2290 014770 104414 ‘NEXT WORD IS INSTRUCTION, ROMCLK PC=S2n4 
2291 O14772 122110 122110 ‘LOAD OUT 

2292 014774 O04 032044 JSR PC, OCOR ‘WAIT FOR OCOR To SET 

2293 915000 CLR Ra CLEAR BIT ¢ 

226% 015002 O1 MOV CHARACT ai 

2295 015004 104415 oD000e2 DATACLK, 2 TICKS nO SET UP TRANSMITTER 

22% 015010 012737 000176 oolese MOV @¢8<O1111110>, re -PUT FLAG CHARACTER IN TEMP3 

2297 015016 104415 O00001 64$:  DATACLK, 1! CLotK FLAG ONCE 

2298 015022 106037 001252 RORB TEMP3 : SHIFT SOFT FLAG 

2299 015026 103405 BCS 65S :BR IF BIT IS MARK 

2300 015030 004737 oO3201e2 JSR PC. GETSI LOOK AT BIT WINDOW 

2301 015034 103006 Bcc 66$ :BR IF OK 

2302 015036 104026 HLT 26 “ERROR IN FLAG CHAR 

2303 015040 BR 66S 

2304 015042 004737 O32012 65$: JSR PC GETSI ;LOOK AT BIT WINDOW 

230S 01504 103401 BCS 66$ :BR IF OK 

2306 O150SO 104026 HLT 26 ‘ERROR IN FLAG CHAR 

2307 015052 66S: INC R3 :INC BIT COUNT 

2308 015054 022703 000010 CMP #10,R3 ?FLAG DONE YET? 

2309 015060 001356 NE 64S :BR IF NO 

2310 015062 005003 CLR R3 ‘CLEAR BIT COUNT 

2311 O15064 104415 900001 iS: DATACLK, l ‘SHIFT NEXT BIT IN THE WINDOW (SI BIT) 
2312 015070 106002 RORB ‘Re ‘SHIFT NEXT SOFTWARE BIT IN TO CARRY 
2313 015072 103005 cc 2g BR IF CARRY CLEAR 

2314 015074 004737 oO32012 ISR PC, GETSI :GET THE WINDOW 

2315 015100 103406 BCS 3$ :BR IF BIT IS A MARK 

2316 015102 104006 HLT ‘ERROR BIT WAS A SPACE 

2317 015104 00404 BR 3$ :CONTINE WITH TEST 

2318 015106 0047327 oO32012 23: ISR PC, GETSI ‘GET THE WINDOW 

2319 015112 103001 BCC 3$ :BR IF BIT IS A SPACE 

2320 015114 104006 HLT ERROR BIT WAS A MARK 

2321 015116 3S: 

2322 015116 005203 INC R3 :NEXT BIT 

e3e3 015120 022703 o00010 CMP 810,R2 :DONE YET? 

324 015124 00135 BNE 1$ ‘BR IF NO 

2325 015126 104415 o00014 DATACLK, 14 5 CLOCK TRANSMITTER 14 MORE TICKS 

2 015132 104414 ROMCLK !NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
2 015134 021264 021264 sPORTH*LU-1 

2328 015136 032761 o00040 oD0004 BIT #B1TS,4(R1) RTS, SHOULD BE CLEAR NOW 

5363 pial 001401 BEG 43 :B . 

23 15146 104034 HLT 34 ‘FRR S NOT CLEAR 

es2l 015150 104400 4S: SCOPE + ECOPE "THIS TEST 

2333 


2334 ,eeeeeReRRRRRRERERRRRRRRERAE TEST CO] Akteeeeeearaeateaeetsaeeaees 
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2335 :#BITSTUFF TRANSMITTER TEST 

2336 #SINGLE CLOCK THE CHARACTER 252 

2337 !aCHECK FLAG AND DATA IN THE BIT WINDOW 

338 :#VERIFY EACH BIT POSITION AS IT 

2339 :#PASSES THE BIT WI (SI BIT 

2340 :#0N AN ERROR, R3 CONTAINS BIT POSITION OF FAILURE 

sai ss PeVETETETICTTOTETOTTTTETETTTTTT TTT TTT PETIT TTT TTT ECT T TTT TTT 

ea3 ; TEST 21 

2345 015152 012737 000021 901226 TST21: Mov #21, TSTNO 

234% 015160 010737 015434 O01216 MOV #TSt22, NEXT 

2347 ;R1 CONTAINS BASE DMCil ADDRESS 

2348 O15166 104412 MSTCLR :MASTER CLEAR DMC11 

2349 015170 O0S061 o00004 CLR 4(RL) ?CLEAR PORTY 

2350 015174 104414 ROMCLK "NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 

2351 015176 122117 le2117 ‘PUT LINE UNIT IN BITSTUFF MODE 

2352 015200 004737 74 JSR PC, CLRIO :DO THIS AFTER MODE IS SET 

2253 015204 7 033612 CLR BITCON :CONSECUTIVE 1’S COUNTER INIT TO 0 

2354 015210 012711 000 MOV #BIT11,(R1) :SET LINE UNIT LOOP 

2355 015214 737 032176 JSR PC, OUTRDY ‘WAIT FOR OUT-READY 

2356 015220 012761 000001 o00004 MOV #i/4(R1) !SET BITO IN PORTY 

2357 015226 104414 ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 

2358 015230 122111 122111 ‘SET SOM! ‘ 

2359 015232 104414 ROMCLK ‘NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 

2360 015234 122110 122110 “LOAD C 

2361 015236 0002 82S2,RS ;LOAD CHARACTER od RS FOR TYPEOQUT 

2362 015242 004737 032176 JSR PC. OUTRDY ;WAIT FOR OUT-READY 

2363 015046 010561 o00004 MOV RS/4(R1) ‘LOAD PORTY WITH CHARACTER 

2364 015252 104414 ROMCLK :NEXT WORD IS INSTRUCTION, R0MCLK ©C=5304 

2365 015254 122110 122110 :LOAD OUT DATA 

2366 0152056 004737 o32044 JSR PC, OCOR ‘WAIT FOR OCOR TO SET 

2367 015262 005003 CLR R3 :CLEAR BIT COUNTER - 

2368 015264 010502 MO RS ,R2 !LOAD CHARACTER IN R2 

2369 015266 104415 oo00002 DATACLK, 2 °3 TICKS TO SET UP TRANSMITTER 

2370 015272 012737 000176 001252 MOV #tB<Ol111110>, TEMP3 ;PUT FLAG CHARACTER IN TEMP3 

2371 015300 104415 900001 64S: DATACLK, 1 :CLOCK FLAG ONCE 

2372 015304 106037 901252 RORB TEMPS :SHIFT SOFT FLAG 

2373 015310 103405 BCS 65S ‘BR IF BIT IS MARK 

2374 015312 004737 O32012 JSR PC GETSI :LOOK AT BIT WINDOW 

2375 015316 103006 BCC 66$ ‘BR IF OK 

2376 015320 104026 HLT 6 :ERROR IN FLAG CHAR 

2377 015322 OO0404 BR 66S 

2378 015304 004737 032012 6S$: JSR PC GETSI :LOOK AT BIT WINDOW 

2379 015330 103401 Bcs 66$ :BR IF OK 

2380 015332 104026 HLT ‘ERROR IN FLAG CHAR 

2381 015334 005203 6S: INC R3 :INC BIT COUNT 

2382 01£33% 022793 op0010 CMP #10,R3 :FLAG DONE YET? 

2383 015342 001356 BNE 64S !BR IF NO 

2384 015344 005003 CLR R3 :CLEAR BIT COUNT 

2385 01534 104415 000001 13: DATACLK, 1 !SHIFT NEXT BIT IN THE WINDOW (SI BIT? 

2386 015352 106002 RORB = R2 :SHIFT NEXT SOFTWARE BIT IN TO CARRY 

2387 015354 103005 SCC 2s :BR IF CARRY CLE 

2368 015356 004737 o32012 ISR PC, GETSI :GET THE WINDOW 

2389 0:5362 10240¢ BCs 33 :BR IF BIT IS A MARK 

2390 «015364 10400¢ HLT 6 “ERROR BIT WAS A SPACE 
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2391 015366 OO0404 gR 3$ :CONTINE WITH TEST 

2392 015370 004737 032012 2s: ISR PC GETS! :GET THE WINDOW 

2333 015374 103001 ec 3$ :BR IF BIT IS A SPACE 

239% 015376 104006 HUT ‘ERROR BIT WAS A MARK 

2395 015400 38: 

23% 015400 005203 IN ;NEXT BIT 

2397 O15 022703 000010 CMP #10,R3 ;DONE YET? 

2398 015406 001357 8 F NO 

2399 015410 104415 000014 DATACLK, 14 ; CLOCK TRANSMITTER 14 MORE TICKS 

2400 O15414 104414 ROMCLK ‘NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 

2401 015416 021264 021264 PORTY*LU-13 

e402 015420 032761 oco0040 000004 BIT #BITS,4(R1) “RTS D BE CLEAR NOW 

2403 015426 001401 BEQ 4¢ ‘BR IF Y 

2404 015430 104 HLT 34 ‘ERROR, RTS NOT CLEAR 

2405 015432 104400 4$: SCOPE :SCOPE THIS TEST 

Sage 

2408 s RESRELERSLERLERRERE LEE EEE TEST Cl SHERERERELSRESEEL ESSE SA AES 

2409 :#BIT STUFF TEST 

2410 :#THIS TEST CHECKS ZERO BIT STUFF ING OF 

2411 ;# THE TRANSMITTER IN THE BIT WINDOW 

suis SSRRERKSHSRAARESAASSEAARARLAFLAASLESAAEAAAARALFAAAAEA ALA RELL LAE 
l 

ath ; TEST 22 

2416 015434 012737 o00022 001226 TST22: Mov #22, TSTNO 

2417 015442 012737 O1S744 OO!216 MOV #7St23, NEXT 

2418 :R1 CONTAINS. BASE DMC11 ACDRESS 

2419 O1S4SO 104412 MSTCLR :MASTER CLEAR DMC1. 

2420 015452 005061 900004 CLR 4(R1) :CLEAR PORTH 

2421 O154S6 104414 ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 

2422 015460 122117 122117 ‘PUT LINE UNIT IN BITSTUFF MODE 

2423 015462 004737 033374 ISR PC CLRIO :DO THIS AFTER MODE IS SET 

424 015466 012711 904000 MOV e6fT11,(R1) : SE Ly LOOP 

2425 015472 004737 032176 ISR PC, OUTRDY ‘WAIT FOR QUT -READY 

2426 015476 012761 000001 co0004 MOV #)°4(R1) :SET BITO IN PORTY 

2427 015504 104414 ROMCLK ‘NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 

24eg 015506 ie2lll 122111 :SET SOM! 

2429 015510 104414 ROMCLK ; NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 

2430 O155i2 122110 122110 CHAR 

2431 015514 004537 033332 JSR RS,MESLD ‘TOAD OUT SILO DATA 

2432 015520 033640 STUFDT ; MESSAGE” *ADDRESSS 

2433 015522 000024 20. R OF CHARACTERS 

2434 015524 012704 033640 MOV #STUFDT,RY RYs CHARACTER POINTER 

2435 015530 CLR R3 :R3= BIT COUNTER 

2436 015532 012700 oon006 MOV #6, RO sB1T COUNTER FOR ERAS CHARACTER 

2437 015536 104415 000002 DATACLK, 2 ‘SET UP TRANSMITT 

2438 015542 012737 000176 001252 MOV #¢B«O1111110>, TEMPS | ;PUT FLAG ATARACTER IN TEMP3 

2439 015550 104415 000001 64S: DATACLK, 1 CLOCK FLAG ONCE 

2440 O15554 106037 001252 RORB  'TEMP3 OT SOFT FLAG 

2441 O15560 10 BCS 65S ;BR IF BIT IS MAR 

e442 015562 004737 032012 JSR PC GETSI ‘LOOK AT BIT WINDOW 

2443 015566 103006 BCC 66$ k 

e444 015570 104026 HLT 26 ERROR IN FLAG CHAR 

eS 015572 O00404 BR 66S 

2446 615574 904737 o32012 st } ISR PC, GETSI sLOOK AT BIT WINDOW 
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2447 015600 103401 BCs 66$ :BR IF OK 
2448 Bi 3606 104026 HLT 8 sERROR_IN FLAG CHAR 
e443 Ol 005203 66S: INC i INC BIT COUN 
01S606 O2e2703 000010 CMP #10,R3 ;FLAG DONE YET? 
2451 O1S6le O01 BNE 64S ;BR_IF NO 
e4S2 015614 CL ‘CLEAR ATT COUNT 
24S3 015616 Ole700 000024 MOV #20. ,RO ;RO=CHARACTER COUNTER 
2454 015622 005037 033612 CLR BITCON i CLEAR BIT ar COUNTER 
24SS 01S6e6 112405 33: MOVB (R4)+,RS ;LOAD CHARACTER IN RS 
24S6 015630 010502 MOV RS,Re LOAD CHARACTER i Re 
24S7 015632 104415 000001 4$: DATACLK, 1 : SHIFT OTAT ONCE 
24S8 015626 106002 RORB Ro : SHIFT a all. 
24539 015640 103407 BCS S$ :BR IF CARRY SET 
2460 015642 905037 033612 CLR BITCON :CLERR AME 4 RO TCEF COUNTER 
2461 015646 004737 032012 JSR PC ,GETSI 
2462 015652 103010 BCC Spaete 
2463 015654 104006 HLT 6 fae WINDOW WAS A MARK 
2464 015656 000406 BR 63 : CON 
2465 015660 005237 033612 S$: INC BITCON : ADD 1 at” BIT STUFF COUNTER 
2466 015664 004737 O0320le JSR PC ,GETSI ‘LOOK A WINDOW 
2467 015670 103401 Bcs 6$ :BR IF mal 
2468 015672 104006 HLT S : ERROR WINDOW WAS A SPACE 
e469 015674 022737 oo000S 033612 6$: CMP #S,BITCON > HAVE THERE BEEN S !’S IN A ROW 
2470 015792 001010 B 7 ;BR IF NO 
2471 Ol 37 033612 CLR BITCON ‘IF YES CLR BIT srr COUNTER 
2472 O15710 104415 00000) DATACLK, 1 : AND CLOCK TRANSMITTER ONCE 
2473 015714 ile 03201e JSR PC, GETSI ; CHECK WINDOW FOR A ZEOR STUFF!! 
e474 015720 1 1 BCC 7$ : BR 4 WINDOW IS A 
2475 015722 104030 HLT 30 ERR "TREN TER DID NOT STUFF & ZERO 
2476 015724 005203 7$: INC R3 : BUMP ae 
2477 018726 Oee703 900010 CMP #10,R2 : DONE Pls” SUA REC TER YET? 
2478 015732 001337 BNE aE ‘BR IF NO 
2479 015734 005003 CLR R3 :RESTART BIT COUNTER AT ZERO 
2480 015736 005300 DEC RO :DEC CHARACTER COUNTER 
2481 015740 001332 BNE 3$ :BR IF NOT DONE YET 
e4Be O1S742 104400 8$: SCOPE :SCOPE THIS TEST 
2485 pesnensvocngsoconsersoszerse TEST 23 SRxRRSRAEASSEALEESSSESRLSEE 
2486 : #B'TSTUFF TRANSMITTER T 
2487 : #SINGLE CLOCK THE Cent ER 377 
2488 !#CHECK FLAG AND DATA IN THE BIT WINDOW 
2489 ;#VERIFY EACH BIT POSITION AS IT 
2490 Pte THE BIT WINDOW (SI BIT) 
2431 AN ERROR, R3 CONTAINS BIT POSITION OF FAILURE 
suas Se sapeseanabonbedtansdenensenasdapancucneseibecseuesecoueneass 
aaa ; TEST 23 
2496 O1S744 012737 GgUu0023 901226 TS723: Mov #23, TSTNO 
2497 015752 012737 Ol6252 O02! MOV aTSto4, NEXT 
2498 ;R1 CONTAINS md A a ADDRESS 
2499 O15760 104412 MSTCLR ; MASTER CLEAR DMC 
eso0 915762 005061 O00004 CLR 4(R]) CLE 
e501 QO15766 104414 ROMCLK INERT WORD 1s INSTRUCTION, ROMCLK PC=5304 
2502 915770 122117 122117 :PUT LINE UNIT IN BITSTUFF MODE 
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2503 015772 004737 033374 JSR PC CLRIO :D0 THIS AFTER MODE IS SET 
2504 015776 005037 033612 CLR BITCON ;CONSECUTIVE 1’S COUNTER INIT TO 0 
2505 016002 012711 O04000 MOV #81711, (R1) SET LINE UNIT a OOF 
2506 016006 73? 032176 JSR PC, OUTRDY 
go07 01018 012761 000001 oco0004 MOV #1;4(R1) ce - tN “PORTS 
i 109414 ROMCLK bt NSTRUCTION, ROMCLK PC=S304 

2509 016022 122111 122111 
2510 O16024 104414 ROMCLK i REXT “BORO IS INSTRUCTION, ROMCLK PC=S304 
2511 016026 122110 122110 ‘LOAD GARBAGE 
2512 016030 00037 MOV 8377,RS ;LOAD CHARACTER IN RS FOR TYPEOUT 
2513 016034 010537 016206 MOV RS5,5$ *LOAD CHAR FOR STUFF CHECK 
2514 O16040 004737 032176 JSR PC’ , QUTROY tWATT FOR OUT-READY 
2515 O16044 010561 900004 MOV RS/4(R1) LOAD PORTY WITH CHARACTER 
2516 016050 ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
2517 016052 122110 122110 ;LOAD OUT 
2518 O16054 004737 032044 JSR PC,OCOR ‘WAIT FOR OCOR TO SET 
2519 016060 005003 CLR Ra :CLEAR BIT COUNT ER 
2520 016062 010502 :LOAD CHARACTER 
2521 O16064 104415 oo000e DATACLK, 2 TICKS TO SET uP TE ANSHITTER 
2522 016070 012737 000176 001252 MOV #?B<O1111110>, rehe3 “PUT FLAG CHARACTER IN TEMP3 
2523 016076 104415 000001 64$:  DATACLK, 1 CLO¢K FLAG ONCE 
2504 016102 106037 001252 RORB TEMP SHIFT SOFT FLAG 
2525 016106 103405 BCS 65S :BR IF BIT IS MARK 
2526 016110 737 032012 JSR PC GETS! ‘LOOK AT BIT WINDOW 
2527 016114 103006 BCC b6$ K 
2528 016116 026 HLT 26 ERROR IN FLAG CHAR 
2529 016120 OO0404 BR 665 

Ol6le2 004737 032012 653: JSR PC GETSI ;LOOK AT BIT WINDOW 
2531 016126 103401 BCS 66$ -BR IF OK 
2532 016130 104026 HLT 26 ERROR IN FLAG CHAR 
2533 016132 O0S203 6S: INC R3 :INC BIT COUN 

016134 022703 oo0010 CMP #10,R3 FLAG DO% vere 
2535 016140 001356 BNE b4$ :BR IF NO 

016142 005003 CLR R3 :CLEAR BIT COUNT 

016144 005037 033612 CLR BITCON “CLEAR STUFF COUNT 
2538 016150 104415 000001 18: DATACLK, l ;SHIFT NEXT BIT IN THE WINDOW (SI SIT) 
2539 016154 106002 RORB Re ‘SHIFT NEXT SOFTWARE SIT IN TO CARRY 
2540 016156 103005 BCC 2$ :BR IF CARRY CLEAR 
2541 O16160 004737 032012 JSR PC,GETSI :GET THE WINDOW 
2542 016164 103406 BCS 3$ :BR IF B a 
2543 016166 104006 HLT ‘ERROR BIT WAS A SPACE 
2544 016170 OO0404 QF 3% :CONTINE WIT 
2545 016172 004737 O32012 2s: JSR PC, GETSI :GET THE WINDOW 
2546 O16176 103001 Bcc 33 :BR IF BIT IS A SPACE 
2547 016200 104006 HLT 6 ‘ERROR BIT WAS A MARK 
2548 016202 33: 
2549 016202 004537 033474 ISR RS, STFFCK : CHECK FOR BIT STUFF 
2550 016206 000377 S$: 377 ‘DATA CHA RAC TER 
2551 016210 oo0c00! 1 :SHIFT C 
2552 Oléele 010237 olsen MOV R2,S$ : LOAD chek NOR STUFF CHECK 
2553 Ol6216 005203 INC !NEXT BIT 
2554 016220 622703 oon010 CMP #10,R3 :DONE YET? 
2555 Olb20% 051351 SNE 1$ :BR IF NO 
25S Ol6226 104415 C00014 DATACLK, 14 :<LOCK TRANSMITTER 14 MORE TICKS 
2557 Olgese 104414 ROMCLK INEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
2556 016234 021264 921264 : PORTH*LU-13 


ee ee 2 oc ee- sme -- _—— - — 
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2559 016236 032761 O00040 9O00004 BIT aBITS,4/R1) RTS pose BE CLEAR NOW 

2560 016244 001401 BEQ 4$ YES 

2561 016246 104034 HLT 34 te RROR, RTS NOT CLEAR 

S2pe 016250 104400 4$: SCOPE : SCOPE’ THIS TEST 

2564 

2565 ; REERERAERERERERERERREREEEEE TEST O4 £kteetedeseeeeeseseesesssss 

2566 : #BITSTUFF trary TER TEST 

2567 *SINGLE CLOCK A BINARY COUNT PATTERN 

2 : eVERIFY EACH BIT POSITION AS IT 

2569 sare = THE BIT WIND I BIT) 

270 IN ERROR, R3 CONTAINS ait positon “7 FAILURE 

257) sano ARS CONTAINS THE CHARACT 

$7. et Be ck te Be Een Rs hk ELE AIO 

¢ 

57 Te ; TEST 24 

2576 OlbeSe O1e737 O0000e4 001226 TST24: Mov #24, TSTNO 

2577 O16260 012737 OC16604 O0le16 MOV 8TSt25,, NEXT 

2578 ;R1 CONTAINS BASE DMC11 ADDRESS 

2579 Olb266 104412 MSTCLR !MASTER CLEAR DMC11 

2580 016270 00506! oo0004 CLR 4(R1) : CLEAR PORTY 

2581 O16274 104414 ROMCLK sNEXT WORD IS INSTRUCTION Rone Pc=S304 

2582 016276 122117 122117 :PUT LINE UNIT IN BITSTUFF M 

2583 916300 004737 033374 JSR PC CLRIO :D0 THIS AFTER MODE IS SET 

2584 016304 005037 033612 CLR BITCON : CONSECUTIVE 1’S COUNTER INIT TO O 

2585S 016310 Ol2711 o04000 MOV sBIT11,(R1) iSET LINE UNIT LOOP 

2586 016314 005003 CLR R3 R3 CONTAINS BIT COUN 

2587 016316 O0S004 CLR oo RY CONTAINS CHAR TO BE LOADED IN SILO 

2588 016320 CLR BS iRS CONTAINS CHARACTER CURRENTLY BEING SHIFTED ¢ 

2589 016322 004737 032176 JSR PC ,OUTRDY T FOR OUT- nor 

2590 Ol63e6 012761 O0000!1 9200904 MOV #1, 4(R1) : SET BITO IN PORTY 

2591 O16334 104414 ROMCLK : NEX XT WORD IS INSTRUCTION, ROMCLK PC=5304 

2592 016336 122111 l22111 : SET SOM! 

2593 016340 14 ROMCLK *NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 

256 Ol634e 122110 le2ello tL GARBAGE CHAR 

2S9S 016344 37 032176 JSR PC ,OUTRDY ;WAIT FOR QUT -REAQY 

2596 QO163S50 010461 900004 MOV R4,4.R1) LOAD PORT4Y WITH CHARACTER 

2S97 016254 104414 ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 

2598 016356 122110 122110 LOAD OUT DATA 

2599 016360 905204 N ao ‘INCREMENT TO ex CHARACTER 

2600 016362 004737 032176 JSR PC ,OUTRDOY : WAIT FOR OUT-READY 

260! O16366 010461 oCO004 MOV RY, 4(R1) sLOAD PORTY WITH CHARACTER 

2602 016372 104414 ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=S5304 

2603 016374 122110 122110 ‘LOAD OUT DATA 

2604 016376 737 032044 JSR PC ,OCOR sWALT FOR OCOR TO SET 

2605S Ol6402 1044iS 900002 DATACLK, 2 TICKS TO SET UP TRANSMITTER 

e606 Ol16406 012737 900176 901252 MOV ef8<Ol111110>, rete -PUT FLAG CHARACTER IN TEMPS 

2607 O16414 104415 000001 64$:  DATACLK, 1 :CLOCK FLAG ONCE 

2608 Ql6420 106037 O0lece RORB TEMP3 ; SHIFT SOFT ss 

2609 O1642e4 103405 cs 6S$ IF BIT IS MA 

2610 Ol6426 004737 O3201e2 JSR PC GETS! TOOK AT BIT WINDOW 

2611 O16432 10300 CC be$ :BR IF OK 

etle ClE434 1040eEb HLT 26 : ERROR IN FLAG CHAR 

cti3 Ol16436 O00404 aa 663 

2614 OL6440 004737 032012 ‘ct JSF Pc GETS! :LOOK AT BIT WINDOW 
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2615 O16444 103401 

2616 Olea 104026 

2618 Bt ede 83 900010 

2619 016456 001356 

2620 016460 005003 

abe 16462 005037 033612 
16466 00500 

2623 O16470 010502 : 

a 

Ses¢ BENE Thesis | Bd838: 

2626 O16502 106002 

2627 016504 103005 

2628 016506 004737 032012 

2629 016512 103406 

2630 O16514 1} 

2631 O16516 

2632 016520 004737 032012 

2633 016524 103001 

2634 O1bb¢6 104006 

2635 0165 

2636 016530 004537 033474 

2627 016534 900000 

2638 016536 90000) 

2639 016540 010237 O16534 

2640 016544 005203 

2641 016546 022703 O00010 

2642 O16552 001351 

2643 O16554 005204 

2644 016556 004737 032176 

2645 016562 010461 000004 

2646 016566 104414 

2647 016570 122110 

264e 016572 O05205 

e643 O15 74 b22705 000400 

seep Sikes = odaa6 

2e52 

2653 

2654 

2éss 

2E5E 

2657 

2e5e 

E55 

2EE0 

PEE] 

2662 

2663 

2664 16604 012737 o00025 901226 

ebes Ole6le 012737 017072 OOl2le 

2667 Olbe20 104412 

2668 Olétee OOS0E! oco0o4 

2663 Clbbee 104414 

2670 S16630 122117 
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66$: 


4§: 


1$: 


3$: 
6$: 


S$: 


RS ,STFFCK 


Re ,6$ 
R3 
#10,R3 
, 


BC, OUTRDY 
R474(R1) 


PAGE: 


;BR IF OK 
s;ERROR IN FLAG CHAR 
a OUNT 
;PL YET? 
NO 


BIT COUN 
IT COU COUNTER 
IT COUNTER 
‘TOAD CHARACTER IN Re 

GHAR FOR STUFF CHECK 
: SHIFT nex IN THE WINDOW (SI BIT) 
:SHIFT NEXT SpE THARE BIT IN TO CARRY 
‘BR IF CARRY CLEAR 
:GET THE WINDOW 
:BR IF BIT IS A MARK 
‘ERROR BIT WAS A SPAC 
s CONT INE WITH Test 


al TH Boras 


; CHECK FOR Ai STUFF 
:DATA_CHARAC 

: SHIFT COUNT 

LO ow FOR STUFF CHECK 
‘DONE YET? 

:BR IF NO 

;NEXT CHARACTER 

;WAIT FOR OUT-READY 

; LOAD PORTY WITH CHARACTER 

NEXT WORD AS INSTRUCTION, ROMCLK PC=5204 
:LOAD OUT DAT 


;NEXT CHARACTER 
; DONE yy 


sede Me THIS TEST 


s RERRRRERAERRARAARARAARLREEEE TEST OD #eeeedetatareceaeteeeetseeese 


; MULTIPLE FLAG a. og 
S FLAGS AND A 


ABORT TEST 
CHAR ( « 


#LOAD SILO WITH 00) 
t SVERIFTY IN THE BIT WINDOW THAT THE FLAGS 
:#AND DATA ARE CORRECT AND FOLLOWED ay” AN ABORT 
s FSEQUENCE (8 CONTIGUOUS 1°S) 


ee te Re tL Ie LR ree ean oe 


; VEST 2S 


MSTCLR 
CLR 


ROMCLK 
le2i17 


#25, TSTNO 


#TST26, NEXT 


4(R1) 


;Rl CONTAINS , peu RODRESS 
Peon i DMC 


CLEAR PORTY 
“NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
:PUT LINE UNIT IN BITSTUFE MOLE 


007: 
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2671 016632 004737 033374 JSR PC, CLRIO :00 THIS AFTER MODE IS SET 
e672 O1b636 012711 004000 nov e111, (RL) jSET LU LOOP 
‘ a 0000 , 
spe3 Bi eeuE acta CLR a3 ‘ELE GR cout COUNTER 
2675 016650 004737 032176 13: JSR PC, OUTRDY “WAIT FOR OUT SREADY 
3676 016654 012761 oO00001 oco0004 MOV el S4(R1) ;SET BITO IN PORTY 
16662 104414 ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=5204 
2678 O16664 leelli 122111 :SET SOM! 
2679 016666 104414 ROMCLK ‘NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
2680 016670 122110 122110 !LOAD GARBAGE CHAR 
3681 01667¢ E R Di 
16674 O01 1 : THER 
es ties Geo Sue AY ee oe 
2685 016706 104414 ROMCLK REXT WORD IS INSTRUCTION, ROMCLK PC=S304 
2686 016710 122110 122110 ‘LOAD A ZERO 
2687 O16712 004737 032044 JSR PC,OCOR ‘WAIT 
2688 O16716 012700 900005 MOV #5'RO "RO = FLAG COUNT 
e685 Olb7ee 104415 co00de2 ns DATACLK, 2 :SET UP TRANSMITTER 
2691 016726 012737 000176 901252 MOV w1B<Q1111110>, TEMPS ;PUT FLAG CHARACTER IN TEMP3 
2692 016734 104415 000001 643: DATACLK 1 CLOCK FLAG ONCE 
2693 016740 106037 001252 RORB  ' TEMP3 Sh fas SOFT FLAG 
2694 O16744 103405 Bcs 6S F grr Is MA } 
2695 016746 004737 032012 JSR PU GETS! i Bok AT BI WINbou 
26% 016752 103006 BCC b6$ :BR IF OK 
26397 016754 104026 HLT 26 :ERROR IN FLAG CHAR 
2698 016756 600404 BR 66S 
26939 016760 004737 032012 6S5$: JSR PC GETS! :LOOK AT BIT WINDOW 
2700 016764 103401 BCS b6$ :BR IF OK 
2701 016766 104026 HLT 26 : ERROR IN FLAG CHAR 
2702 016770 005203 66S: INC R3 :INC BIT C 
2703 016772 022703 o00010 CMP #10,R3 ‘FLAG DONE VET? 
2704 016776 001356 BNE 64S :BR IF NO 
2705 017000 005003 CLR R3 :CLEAR BIT COUNT 
2706 017002 005300 BEC RO :OEC COUNT 
2707 017004 001350 BNE 23 :BR IF NOT DO 
2708 017006 CLR R3 :R3 = BIT COUNT 
2709 017010 05005 €LR RE !RS = “EXPECTED” 
2710 Ol70le 104415 00001 38: BATACLK, 1 :CLOCK ONCE 
2711 017016 004737 O32012 ISR PC, GETS! : GO 00K AT allINOOW 
2712 017022 103001 BCC u§ :BR IF A SPACE 
2713 0170204 104006 HLT b ‘ERROR, A MARK WAS SEEN 
2714 017026 005203 4$: INC R3 sINC Bir COUNT 
2715 017030 022703 oo0ol0 CMP #10,R2 
2716 017034 001366 BNE 3$ Nee uy 
2717 017036 005003 CLR R3 BR Ok BIT COUNT 
2718 017040 012705 900377 MOV #377,RS "RS = “EXPECTED” 
2719 017044 104415 90000) S$: DATACLK, l “CLOCK ONCE 
e720 Ol 004737 032012 JSR PC, GETS! ‘LOOK AT WINDOW 
2721 017054 103401 BCS $ :BR IF A MARY - 
2722 017056 104033 HLT 33 “ERROR, A SPACE Was SEEN 
2723 017060 905203 68: INC R3 ;INC BLT COUNT 
2724 017062 022703 000010 CMP #10,R3 !DONE YET? 
725 O1706E OO13GE BNE cs :BR IF NO 
2726 017070 104400 SCOPE “SCOPE THIS TEST 
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000926 00126 
O173ie OOlelb 


000904 
033374 


Bag00 000094 


009001 ccodcy 


032044 
000002 
000001 
0320 1le 
000020 


000176 
000001 
0012Se2 


032012 


032012 
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TST26: 


1§: 


64$: 


65$: 


ces: 


I06 


s REERRRERRERARRRERRARRRREERE TEST Ch #HeeeHeEAER EE REEEE EEE TEESE 


;*LEADING ZEROS TEST 
s #VERIFY rat THE SETTING OF SOM AND EOM TOGETHER 


!#AND THEN SOM ALONE WILL GENERATE 16 LEADING ZEROS 
#AND A FLAG, THE CHECK IS MADE USING THE BIT WINDOW 
WTITitiiitiiiiiitiittiitiititititititititiiitiittiitiitiitiiiy! 

; TEST 26 

MoV #26, TSTNO 

MOV eTSt27, NEXT 

RL CONTAINS BASE DMCil ADDRESS 

MSTCLR : ASTER CLEAR DMC11 
CLR 4Y(R1) i PO 

ROMCL NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
12211 jSET TO BITSTUFF MODE 

JSR PC. CLRIO !D0 THIS AFTER MODE IS SET 

MOV wBtTI1, (RL) ‘SET LU LOOP 

JSR PC, OUTRDY WAIT FOR QUTROY 
MOV #3,4(R1) ‘LOAD PORT 
ROMCLK : NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
le2i11 :SET SOM & EOM 
ROMCLK ‘NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
12211 : GARBAGE CHARACT ER 

OV #1,4(R1) sO PORT 
RONCLK HT WORD IS INSTRUCTION, ROMCLK PC=S304 
RONCL K sel WORD IS INSTRUCTION, ROMCLK PC=5204 
ROMCLK iNEXT | WORD IS INSTRUCTION, ROMCLK PC=5304 
12211 GARBAGE CHAR 
JSR PC, OCOR say FOR OCOR 
CLR RO’ = BIT COUNT 
DATACLK, 2 -SET UP TRANSMITTER 
DATACLK? 1 :SINGLE CLOCK TRANSMITTER 
SR “PC, GETS! LOOK AT BITWINDOW 

? 

HLT 41 sERROR WINDOW WAS A MARK 
CMP #16.,R0 :16 ZEROS YET? 
SNE 1$ iBR IF NO 
CLR R3 = BIT COUNT 
MOV #tB<OlL11110>, reheS | “PUT FLAG CHARACTER IN TEMP2 
DATACLK, l CLotk FLAG ONCE 
RORB | TEMP3 ;SHIFT SOFT FUR co 
BCS 5s rate 

SR C GETSI Coo AT BI 5 NOM 
BCC 6$ 
HLT 26 iB RROR tN FLAG CHAR 
BR 66S 
JSR PC, GETS! ;LOOK AT BIT WINDOW 
BCS 66$ K 
HLT 26 ‘ERROR IN FLAG CHAR 

INC R3 ?INC BIT COUN 


PAGE: 


0672 


ZOMF =MACY11 30( 1046) 
l2-MAY-77 14:18 


pa HSE les 
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017310 


017312 
017320 


017452 


104400 


012737 
012737 


1ouse 
061 
104414 
122117 
004 


104400 


004737 
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033374 
004000 
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OOi2le 
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JO6 


PRGE: 


BASIC TRANSMITTER TESTS 


TSTe7: 


1$: 


TST3C: 


REI coun 


SCOPE ;SCOPE THIS TEST 


SS TTETURY STRIP Plaa Tat TEST C7 4ERERRERRSERERESS ASE SESE REESE 
: BI TSTUFF STRIP FLAG T 


HUEALEY G8QF° 188 Ni ve'Bee8 Ro Ee 


5 RESERARERAA LSA RAR L AA RELA RAL A AALELA LALA LARA LAAALALEL EL AEA ALLS 


; TEST 27 
MOV #27, TSTNO 
MOV #TST30, NEXT 

;R1 CONTAINS BASE OMC11 ADDRESS 


MSTCLR MASTER LEAR DMC1 
CLR 4(R1) PORTH 

ROMCLK NEXT WORD I We Stag ON, ROMCLK Pco=S304 
leelI7 LINE UNIT 

JSR PC, CLRIO ‘D0 "hte AFTER MODE I 

MOV ee iT11, (RL) :SET LU LOOP 

MOV 2 Re’ :SAVE LU REG FOR TYPEOUT 

JSR Pes SYNC ‘SINGLE CLOCK S SYNC CHARACTERS 

DATACLK, sy 

ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
021244 :PORTY*LUL2 

MOV 4¥(R1) RY : PUT "FOUND" IN RY 

BIC 8277,R4 ‘CLEAR UNWANTED BITS 

CLR RS :PUT “EXPECTED” IN RS 

CMPB 3 saR'S, RY ‘IS ACTIVE CLEAR? 

BEQ 13 : YES 

HLT 40 :ERROR ACTIVE IS NOT CLEAR 

SCOPE :SCOPE THIS TEST 


pasepnesonepeseeererereree TEST 20 SeeRRSRHERRERALAE RARE SPRETS 
: BI TSTUFF IN ACTIVE T 
:#SET LU LOOP, SINGLE iste ae AND A NON-FLAG (301) 


s ¥VERIFY THAT IN ACTIV 
RRREREL RRA AERELEAAEARA EERE AR RRERL ERA LAELERARALALARAR ALLELES 


; TEST 30 
Mov #30, TSTNO 
MOV 8TSt31, NEXT 

:R1 fen LR BASE OMCLL RODRESS 


MSTCLR ;MAST E 
CLR 4(R1) 3CL PORTY 
ROMCLK At WORD IS ee ee ROMCLK PC=53C4 
fell? HTS aber IN BITSTUFE MODE 
SF PC ,CLRIO TER MOD SET 
MOV sBiT11, (RL) 
MOV #12,Re2 ee ty ec FOR TYPEOQUT 


0674 


KO6 


DZDMF MACYLI 30(1046) Ll-JUL-77 11:59 PAGE SS PAGE: 
DZDME.P11 12-MAY-77 14:18 BASIC RECEIVER TESTS 

1 4737 032062 SR PC, SYNC :SINGLE CLOCK S SYNC CHAPACTERS 

$0 BI Paes Bbaobe Z 
104415 000064 DATACLK, 64 
104414 ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 

ce45 ae A244 021244 :PORTY+LUL2 
2844 017474 O16104 oO00004 * MOV 4(RI),RY ni! “FOUND” IN R4 
2845 017500 042704 000277 BIC #277, RY CLEAR UNWANTED BITS 
284 017504 012705 000100 MOV #B176,RS Pi UTBXPECTED” IN RS 
2847 017510 120504 CMPB sR, R4 :1S actives 
2e48 017512 001401 BEQ 1$ -BR IF YES 
2849 017514 194040 HLT 40 ERROR ACTIVE IS NOT SET 
2850 017516 104400 1S: SCOPE :SCOPE THIS TEST 
28S3 5 RRRERRE ERAS REE REALL EEE EEE TEST 3] HERR HRERELALALEA LER ELLE ES 
29S4 :#BITSTUFF IN ACTIVE TEST 
2ess *#SET LINE UNIT LOOP,SINGLE STEP ONE FLAG AND A CHAR (301) 
2856 pon! THAT IN ACTIVE IS SET 
74 s KHKARSRAALAA SERS RARE LAA RAL AAAS LAAALAALAA FLA RALAALALAALALLLALS 
2858 ; TEST 31 
2961 017520 012737 000031 001226 TST31: MOV #31, TSTNO 
e862 017526 O1e737 O17656 OOlel6 MOV 8TSt32, NEXT 
2863 :R1 CONTAINS BASE DMC11 ADDRESS 
2864 017534 104412 MSTCLR :MASTER CLEAR DMC11 
2865 017536 O0S061 oo00004 CLR 4(RL) ?CLEAR PORTY 
e866 917542 104414 ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
2867 017544 122117 122117 PUT LINE UNIT IN BITSTUFF MODE 
2868 017546 004737 033374 ISR CLRIO MUST THIS AFTER MODE IS SET 
oaoc ie btSeaB ne ROY eet, ors: ; SAVE REG ADDRESS FOR TYPEOUT 
2871 Ot ees Bago 55 932176 ISR Pe SU TROY :WAIT FOR OU GUTROY 
2872 017566 012761 O00001 ocn004 MOV #1;4(R1) ‘LOAD PORTY 
2873 017574 104414 ROMCLK "NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
2874 017576 leelll 122111 :SET SOM 
2875 017600 104414 ROMCLK ; NEXT WORD IS INSTRUCTION, ROMCLK PC=53C4 
2876 017602 122110 122110 ‘LOAD GARBAGE CHAR 
2877 017604 012761 090301 900004 MOV #301 ,4(R1) ‘TOAD PORTY 
2878 017612 104414 ROMCLK ;NEXT WORD 1S INSTRUCTION, ROMCLK PC=S3C4 
2879 017614 122110 122110 sLORD our DATA 
2880 017616 004737 032044 JSR PC, OCOR att OR OCOR 
288! O17622 104415 O000e23 DATACLK, 23 SINGLE CLOCK THE DAT 
ebbe 17 414 RONCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 

176 1244 021244 ip THeLU-1 
cee tire perm Doe Be RAS eile et 

% 

2886 O17b4e BiS5h¢ Spar bG MOV #8IT6,RS PEXBECTED” IN RS 
2887 O17646 120504 CMPB sR, RV :IS IN abtTive SET? 
cee pt eeee Fares ij is :ERROR, IN ACT ve NOT SET 
ceeA 1oPe6 ah 1S: CC OPE :SCOPE THIS TST 


- ELAAAERAEAAEA LALLA AA AAR TEST 32 eee teeeeeee eee eeeeeReeaee 
: #BI TSTUFF IN ACTIVE TEST 
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2897 
2898 
2899 
2300 
e901 017656 012737 
530 017664 012737 
2904 017672 104412 
2390S 017674 00506 
23906 017700 104414 
23907 917702 122117 
2908 017704 0047 
2909 017710 012711 
2e9i0 017714 Ole70e 
said 177 

1 177 
2913 017726 104415 
2914 0177 4414 
2391S 0177 1e44 
2916 017736 016104 
2317 01774 pis 
Sat 1 A 7 

i 1 1205 


017762 012737 
017770 912737 
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033374 
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000033 
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000004 


00 
000001 


03e342 


ococo4 
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LO6 


BASIC RECEIVER TESTS 


TST32: 


1$: 


TST33: 


PAGE: 

Se] ay LOOP, SINGLE STEP 2 FLAGS AND A NON-FLAC (301) 

#VERIFY THAT’ IN ACTIVE IS SET 

: s REAAAARAASAASARAAALAAAARAARHRAARARAALRALAAAAALASAFSAAFSAALSLALALFSSE 

s TEST 32 
Mov #32, TSTNO 
MOV #TSt33, NEXT 

:R1 CONTAINS BASE ONCL1 ADORESS 

MSTCLR MASTER CLEAR DMC 11 
CLR 4(R1) ; CLEAR PORTY 
ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
122117 “PUT LINE UNIT IN BITSTUFF MODE 

JSR PC. CLRIO :DO THIS AFTER MODE IS SET 
MOV eBtT11, (RL) -SET LU LCOP 
MOV #12,Re° :SAVE LU REG FOR TYPEOUT 

SR Pc éyNC :SINGLE CLOCK 2 SYNC CHARACTERS 
DATACLK, 33 
RON LK NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
0212454 :PORTHeLUL2 
HOV 4¢RL) RM ang RY 
: | 

MOV #BIT6, RS . thi EP BE FED» IN RS 
CMPB =e RS, R4 i1s acrave: SET? 
ne is R AC NOT SET 
SOP Rage actIVE 19 4 


SINGER TEST TEST 33 ekeRFRSSAARERA ALAS ASS SLA LEE 
-% 
:#SYNC UP RECEIVER AND TRANSMIT A CHARACTER 

SET IN CLEAR 


EARED 
 RELERERERALARA SEALER AE RALE RL AERALACREAE ATER ALE LERS TESST ELLE 


; TEST 33 
Mov #33, TSTNO 
MOV eTST34, NEXT 
;R1 CONTAINS | BASE pncia ADDRESS 


MSTCLR sRASTER, 
cLR 4(R1) 
ROMCLK : NEXT WORD 1s INSTRUCTION, ROMCLK PC=S304 
122117 :PUT LINE UNIT IN BITSTUFF MODE 
JSR PC CLRIO :00 THIS AFTER 15 SET 
MOV Re :SAVE REG ADDRESS IN Re FOR TYPEOUT 
MOV tert I (RL) -SET LINE UNIT 
MOV Ri) :SET BITO IN PORTY 
ROMCLK !NEXT WORD IS INSTRUCTION, ROMCLK PC=5204 
22111 ise SOM! 
OMCLK XT WORD IS INSTRUCTION, ROMCLK PC=S204 
$6110 PC, CHARSD + oAD I ; Orn CRARAC CTER 
L, U ; U 
3 coe Site 


O07€ 
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E 


ee 
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BASIC RECEIVER TESTS 


1$: 


2s: 


3$: 


TST34: 


PAGE: 
ATACLK, 33 SIN LOCK THE DATA 
ae UY Flt 
ROMCLK WORD Is INSTRUCTION, ROMCLK PC=5304 
021244 Dok THeLu 
MOV 4(Ri),RY : PUT “FOUND IN RY 
BIC #357,R4 :CLEAR UNWANTED BITS 
MOV #B81T4,RS - PUT poEXPECTED” IN RS 
cHPe RS RY ;1S INRDY SE 
HLT 40 ;ERROR, INRDY IS NOT SET 
MOV #B1T7,4(R1) sL 
ROMCLK KM FORD * IS INSTRUCTION, ROMCLK PC=5304 
122112 :SET IN CLEAR 
ROMCLK ‘NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
Soy 4081) BM ‘PUT FOUND” IN RY 
BIC 7,R4 CLEAR OHNANTED BITS 
CLR Re. :PUT “EXPECTED” IN RS 
cnPe RS ,RY -IS IN ACTIVE CLEAR? 
HLT 40 sERROR, IN ACTIVE IS NOT CLEAR 
MOV 4(R1),R4Y T FOUND INR 
BIC #357, R4 CLEAR UNWANTED eI § 
CLR RS BU “EXPECTED” IN RS 
cre RS, JRY !IS INRDY CLEARED? 
ad 46 :ERROR, INRDY IS NOT CLEARED 
SCOPE SCOPE THIS TEST 


eget tgr oe JEST JY RRSERHRARRLARREAEARARA FLEAS 
: BI TSTUFF BASIC RECEICER 

:#SY NC UP RECEIVER AND EF NGEE ToLock THE CHARACTER 0 

: VERIFY THAT IN RDY IS SET, AND THAT THE CHARACTER WAS RECEIVED 
ETeriiiirititetiteritiittitititititititttiiiticitiieririsicccrs: 


; TEST 34 


Mov #34, TSTNO 
MOV #TST35, NEXT 


: ;R1 CONTAINS BASE DMC11 ADDRESS 
MSTCLR “MASTER CLEAR DMC11 
CLR 4(R1) i ppoeTs. 
RONCLK x T ORD 1s, INSTRUCTION, ROM RONCLK PC=S304 
$6? oe caro ny He Eni nOoe 12 Set 
MOV #12. Re ADDRESS San Re FOR TYPEOUT 
MOV eBIT11, (RL) ory Ef rat 
MOV #1,4(RL) :SET BITO tN TeoRTS 
RONCLK Ne x XT WORD IS INSTRUCTION, ROMCLK PC=5304 
ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 


110 LOAD GARBAGE C 
JSR PC ,CHARSD LOAD SILO WITH CHARACTER 


0077 


NOG 


DZOMF  MACYL1 30(10%6) i1-JUL-77 11:59 Pace 8 PEGE: 0078 
DZDME.P11 12-MAY-77 14:18 BASIC RECEIVER TESTS 
Oe 020254 104415 33 DATACLK 33 ‘STN E cLOCK THE DATA 
3008 Sedeb0 14416 uaa PINES 2 BATFE Og INROY 
10 4 104414 ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
3011 O20266 O21244 021244 !PORTY*LU 12 
3012 020270 016104 o00004 MOV 4(R1).R4 : PUT “FOUND IN RY 
3013 Oe0274 042704 000357 BIC #357,R4 :CLEAR UNWANTED BITS 
3014 020300 012705 000020 MOV 8B1T4,RS - PUT EXPECTED” IN RS 
3015 620304 ie CMPB =e RS, Rv :IS INRDY SE 
16 1401 BEQ 1$ 
3017 020310 104040 HLT 40 ;ERROR, INRDY IS NOT SET 
3018 Ge31¢ 1$: 
3019 Oe031e 104414 ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
3020 020314 621204 021204 sPORTHeIN DATA 
3021 020316 016104 o00004 MOV 4(R1),R4 : PUT IN RY 
3022 020322 O0SO0S CLR RS : PUT EXPECTED" IN RS 
3023 de03eh 120504 CMPB sR, R4 :WAS A O RECEIVED? 
3024 001401 BEG 2 
3025 920330 104010 HLT 10 ;ERROR, RECEIVED DATA IS WRONG 
sceb 020332 104400 2$: SCOPE ‘SCOPE THIS TEST 
3058 
3029 ; RRRERARARRRLAERERRERLERLEHE TEST QS RRRRRERRREERE EERE REESE EE EES 
3030 : BI TSTUFF ensls RECEICER TEST 
30231 :*#SYNC UP RECEIVER AND SINGLE CLOCK THE CHARACTER 125 
3032 :#VERIFY THAT IN RDY IS SET, AND THAT THE CHARACTER WAS RECEIVED 
aa METETeTITTVitrrrtrrrritittirirriritiiritiriitirriiiitietrttrei ys 
3035 TEST 35 
3937 020334 012737 000035 oO01226 TST3S: Mov #35, TSTNO 
3038 020342 912737 O20S04 O01216 MOV #75136, NEXT 
3039 ;R1 CONTAINS BASE DMC11 ADDRESS 
3040 020350 104412 MSTCLR :MASTER CLEAR DMC11 
3041 020352 O0S061 o9c0004 CLR 4(RL) ;CLE 
3042 020356 104414 ROMCLK XT WORD IS INSTRUCTION, ROMCLK PC=S304 
3043 020360 lee? aoatia eel? ad es bo THlg a UNIT IN BITSTUEF MODE 
pep see eae 006012 MOV #12, Re vehec'A ADDRESS IN Ro FOR TYPEOUT 
3046 020372 012711 o04000 MOV aBIti1, (RL) sepye LINE UNIT LOOP 
3047 020376 012761 O00001 oo0004 MOV #1, 4(R1) :SET B19 IN PORTH 
3048 O20404 104414 ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
3049 O20406 122111 122111 :SET SOM! 
3050 O20410 104414 ROMCLK ?NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
3051 Oe04le 122110 122110 ‘LOAD CHAR 
30S2 020414 004737 032342 JSR PC, CHARSD ; LOAD SILO WITH CHARACTER 
020420 000125 125 
3054 Oe0422 104415 900033 DATACLK, 33 :SINGLE "EPock THE DATA 
3055 Oe0426 104416 op0002 TIMER, ‘2 :WAIT FOR INRDY 
3056 Oe0432 104414 ROMCLK ‘NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
3057 34 021244 02124 :PORTY*LU 12 
3058 36 016104 oo0004 MOV 4(Ri),R4 :PUT "FOUND" IN RY 
3059 Oe0442e 042704 000357 BIC #357,.R4 > CLEAR UNWANTED BITS 
beoue 012705 oo0020 MOV #B1T4,RS : PUT 7p EXPECTED” IN RS 
1 120504 C RS,RY :IS INRDY SE 
3062 020454 001401 


DZDNF 
DOME .P11 


3064 


AER SeSe SRE ER ER 


Soni zoRESRe IRATE EES 


b+ b= b+ b= b= bb eb bb bb 8 8 8 


et et ee et et 
MONMWMS WMO 


MACY11_ 30¢ BF 1s 


12-MA 


A1-JUL-77 11:59 PASE $9 
4:18 BASIC RECEIVER TESTS 


0012s 


000036 901226 
020654 O0lel6 


ocoo04 


0 
000001 o0cco4 


oo0co4 
000252 


1$: 


es: 


TST36: 


1$: 


60? 


HLT 40 
ROMCLK 

021204 

MOV 4(R1),R4 
MOV #125,R5 
CMPB sea, RG 
BEQ 2s 

HLT 10 

SCOPE 


sien INRDY IS NOT SET 
ATaCIN DATA INSTRUCTION, ROMCLK PC=S304 
‘PUT * FOUND” IN RY 
mt “EXPECTED” IN RS 
WAS A 125 RECEIVED’ 


JERROR, RECEIVED DATA IS WRONG 
:SCOPE’ THIS TEST 


PAGE: 


pesuespuouepsconenccrvers te TEST JG SERSSERESRERSEE SESE SESE SES 


; #BITSTUFF BASIC RECEICE 
AND SINGLE Oye ie CHARACTER 252 
AND THAT THE CHARACTER WAS RECEIVED 


;*#SYNC_UP RECEIVER 


;#VERIFY THAT IN ROY IS SET 


MEtiritirtttrtiititiitit tet LELEAALLALLERALALSLE LALLA LAA ARELELES 


hov #36, TSTNO 
MOV #7S137, NEXT 


4(R1) 
ROMCL 
l2el1 
JSR PC ,CLRIO 
MOV 


#1e,Re 
MOV eBItii (RL) 
MOV , #1,4(R]) 


122111 
ROMCLK 

122110 

JSR PC, CHARSD 
252 

DATACLK, 33 
TIMER, 2 

ROMCLK 

021244 

MOV 4(R1) RY 
BIC #357, R4 
MOV #BIT4,RS 
CMPB sR R4 

BEQ 1$ 

HLT 40 


PUT "IN RY 
i ELEAR une BITS 
A taahiadl IN RS 

;ERROR, INRDY IS NOT SET 
i NEXT ne IS_ INSTRUCTION, 

4YeIN DATA 
PUT “FOUND” _IN RY 
;PUT "EXPECTED" IN RS 

;WAS A 2S2 RECEIVED” 


eanees, RECEIVED DATA IS WRONG 
;SCOPE THIS TEST 


RA CONTAINS BASE DMC11 ADORESS 
DMC11 

1s INSTRUCTION, ROMCLK PC=S304 
at whiten UNIT IN BITSTUF 

VE "REG ADDRESS IN Re FOR TYPEOUT 
SET LINE UNIT or 
;SET BITO IN PORTS 
Neat Hono IS INSTRUCTION, 
Ne pee IS INSTRUCTION, 
;LORO zibe WITH CHARACTER 
Pia CLOCK ye DATA 


, 12 INSTRUCTION, 


UFF MODE 
T 
ROMCLK PC=S304 


ROMCLK PC=S304 


ROMCLK PC=S3C04 


ROMCLK PC=5304 


0079 


Oo 
< 
~~ 


aa 


wv 

- 

- 
p 
o> 


~~ 


= bb 9 & bo po & pe 


BAIFHEHOASZBVKRFORLSSSVRKR POOLS 


segeenen 


wo 


& 
SRS83 


— 


fororuforofofuroro 
mom tO 


+ bb bb be bs pe 


ssp ee 


LO 0000 G10) GOI OI GIG) GIGI 09 GIO) GG) GIG G) GI 0) GG) GI Gd GI GW GI GI GI Gd CI GI GI Gd GI GL GI) Gd Gs Gu 
Uh fo owe Ves oreo 


b+ b= b= 2 bb BB be be be Ob eb be be b= be be be be be be be eb eb be be pe be be oe ee 


SINNNNO® 
+n Ow 


CO? 
PAGE: 0080 
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o 60 
=“ ? 14:18 BASIC RECEIVER TESTS 


5 RERERERELEREERRERRREREAEEES TEST 37 tbe eee ehh 0040004550440044 
; #BITSTUFF prett RECEICER feet 

;#SYNC_UP RECEIVER AND SINGLE CLOCK THE CHARACTER 377 

;*#VERIFY THAT IN RDY IS SET THAT THE CHARACTER WAS RECEIVED 
METITiTiiiiiriiiiitiiiiittiitiiiiiiiiitititititiiitititirireriys 


; TEST 37 
012737 000037 001226 TS137: MOV #37, TSTNO 
012737 021924 001216 MOV #TST40, NEXT 

:R1 CONTAINS BASE DMC11 ADDRESS 

104412 MSTCLR :MASTER CLEAR DMC11 
00S061 900004 CLR 4(R1) :CLEAR PORTY 
104414 ROMCLK ‘NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
teed 033374 yegli7 PC CLRIO AO Ne TER IN gi TSTier — 
p03583 000012 MOV #12. Re : SAVE A ADDRESS IN Re FOR TYPEOUT 
012711 oo4000 MOV eBIt11, (RL) :SET LINE UNIT LOOP 
012761 oO00001 900004 MOV #1,4(R1) :SET BITO IN PORTY 
104414 ROMCLK ‘NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
122111 122111 ‘SET SOM! 
104414 ROMCLK ‘NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
122110 122110 LOAD CHAR 
00472? 032342 ISR PC, CHARSD ; LOAD SILO WITH CHARACTER 
104415 0900034 DATACLK, 34 ‘SINGLE CLOCK THE DATA 
104416 o00002 TIMER, '2 WAIT FOR INRDY i 
104414 ROMCLK *NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
021244 021244 :PORTH*LU 12 
016104 oo0004 MOV 4(R1),R4 :PUT “FOUND™ 
042704 000357 BIC #357, R4 ‘CLEAR UNWANTED BITS 
01270S 900020 MOV #81T4,RS -PUT “EXPECTED” IN RS 
le CMP RY :1S INRDY SET? 
001401 BEQ 
104040 - HLT 40 sERROR, INRDY IS NOT SET 
104414 ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
021204 021204 :PORT4*IN DATA 
016104 o00004 MOV 4(R1).R4Y ;PUT “F " IN RY 
01270S 000377 MOV 8377,.RS :PUT “EXPECTED” IN RS 
120504 CMPB RS, R4 ‘WAS A 377 RECEIVED? 
001401 BEG 25 , 
104010 HLT 10 ;ERROR, RECEIVED DATA IS WRONG 
104406 23: SCOPE :SCOPE THIS TEST 


s SRERREERERAERRERERTERRRARRE TEST 4D shbeeeaeeeseaetarereeeesees 
;*#BITSTUFF DATA TEST 

;#THIS TEST SINGLE STEPS A BINARY COUNT PATTERN 

;*#CHECKING EACH CHARACTER AS IT IS RECEIVED 

+ REESRRESASEAEEL AER SAREE ALAR ERE RAARARSEAREAAR SARA TERA RAAT LATTE 


; TEST 40 


90 
a 


Sisisteisicinieitieinicietetededeietet tot tetra : 


La) 
» 
“A 


WWWIWWWOWI WWW WWW WWW ON IW ut lw 
b= bs hh bb be a he eh ee 


RERRBRIRE 


forororoforororare 
= b= 0 = 
WONMUIC Wr 


3e20 
3221 
3eee 


‘o 


SORBPRTESBINE LR CseS 


= 
iat) 


Fororofo ur fu fo ro UFO DFOFUFU UFO FOFD FOO roFororoforafOrororD 
PSTRESHSEE 


Ob bb bb be bb be be be be be bo bb be be bb bb pe he pe 


ob = 0 bb 0 be be be bs be be bp hp pe be pe 


| 
ro 


heres RS 
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012737 
012737 


104412 
005061 


naen3? 


000040 O0le26 
021200 O0lel6 


000004 


000400 


032406 
900073 


000041 001226 
021364 OOlelb 


000004 


033374 
O3eb4E 
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718 BASIC RECEIVER TESTS 


TST4O: 


2s: 


3$: 


TSTHL: 


DO? 


MOV #40, TSTNO 
MOV eTST41 NEXT 


4(R1) 


PC, CLRIO 
CLR SCHAR 


SCHAR 
CLR BITCON 
CLR ue 


CLR 
MOV #73,R3 

MOV #BIT11,(R1) 
JSR PC, SILOLD 
DATACLK, 23 
DATACLK: 73 
JSR C, INRDY 
ROMCLK 

021204 

MOV 4(R1),R4 
MOV LRS 

CMPB =e, Rv 

BEQ 

HLT 10 

INC Re 

CMP #400, R2 
BEQ 3 

DEC R3 

BNE 


4§ 
ISR PC SILOLD 
MOV 473,R3 


PAGE: 


;R1 CONTAINS BASE DMC11 ADDRESS 
; MASTER CLE ER DMC11 


!CLEAR PORTH 
NEXT WORD I RUCTION ROMCLK Pc=S304 
‘PUT LINE UN a jist 
i007 THIS AFTER 
T BINAR Y COUNT AT ZERO 
if BIT TUFF SCHAR IS MINUS NUMBER 
T 1°S COUNT AT O 


:R3_I5 CHARACTER COUNT 
SET LINE UNIT LOOP 
iL ts SILO WITH COUNT PATTERN 
NC RECEIVER AND GET IT ACTIVE 
+A OCK IN 73 CHARACTERS 
;WAIT FOR INRDY 
;NEXT WORD iS INSTRUCTION, ROMCLK PC=S304 
a PORT Sen N DATA 


Ot a IN 
T “EXPECTED” iN RS 
Ts ee 


Ara ERROR 
;NEXT_ CHARACTER 
L DONE? 


;BR IF YES 
;DECRENENT CHARACTER COUNT 

;BR IF SILO NOT EMP a 
‘OAD SILO WITH HORE. OF COUNT PATTERN 
RELOAD CHARACTER COUN 


INUE 
SCOPE THIS TEST 


; RERRRRARARAELERELEREREREERE TEST 4] seeeetdeactetesereeereteres 


SBI TSTUEE DATA 


TEST 
*THIS TEST SINGLE STEPS A BINARY COUNT PATTERN 
G EACH RECEIVED 


S THE LAST TEST, 


4 
i #exCEPT LINE UNIT LOOP IS SET IN LU REGISTER le 
ERERELERERALRARER LAER REAR ERALA EERE EEERARPELEREL EERE RAREEE ETS 


; TEST 41 


Moy #41, TSTNO 
MOV #TSt42, NEXT 


MSTCLR 
CLR 
ROMCLK 


le2117 
JSR PC,CLRIO 
CLR SCHAR 


4(R1) 


sR CONTAINS BASE DMCi1 ADDRESS 
ty a vn DMC11 

NEXT WORD IS INSTRUCTION, ROMCLK °C=5304 

“PUT LINE UNIT IN BITSTUFF MODE 


:DO THIS AFTER MODE I5 SET 
>START BINARY COUNT AT ZERO 


DZOMF  MACY11 BD’ 


DZOME.P11 12-MA 
3231 021236 005137 
3232 Oele42 005037 
3233 O2le4%6 005037 
3234 OeleSe 005002 
3235 O212eS4 012703 
3236 O21260 005011 
3237 Oelebe 012761 
3238 Oel2e70 104414 
3239 Qele7e 12211 
3240 021274 00473 
3241 021300 104415 
3242 021304 104415 
3243 021310 004737 
3244 021314 104414 
2245 021316 021204 
324% 021320 016104 
3247 021324 010205 
3248 O2i132e6 120504 
3249 021330 001401 
3250 021332 104010 
32S1 021334 005202 
3252 021336 022702 
3253 021342 001407 
3254 021344 005303 
3255 021346 001360 
3256 021350 004737 
3257 021354 012703 
3258 021360 0751 
3253 021362 i04400 
3260 
3201 
3262 
3263 
3264 
3265 
3267 
3268 
3269 
3270 
3271 
3272 021364 012737 
3273 021372 012737 
3274 
3275 021400 104412 
3276 O2140e 005061 
3277 O2l406 104414 
3278 021410 122117 
3279 Oel4¥le 00473 
3280 Oel4l6 012711 
3281 O2l42e 0047 
3282 Oel4e6 00030 
3283 021430 004737 
2284 021434 104414 
3285 021436 122110 
3286 Oel44o = LOM4Is 
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032646 
033612 
032650 
000073 
000040 
032406 
000023 
000730 
032652 


900004 


000400 


032406 
009073 


o00042 
021526 


000004 


033374 
004000 
032230 


032176 


000073 


000004 


0012e6 
O0i21é 
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EO? 


be 
BASIC RECEIVER TESTS 


1$: 


2s: 


3$: 


TSTY¥2: 


COM SCHAR 

CLR BITCON 

CLR STUFLG 

CLR Re 

MOV #73,R3 

CLR (R1} 

MOV #BITS,4(R1) 
ROMCLK 

le2lle 

Se PC ,SILOLD 
DATACLK, 23 
DATACLK, 730 
JSR C, INR 
ROMCLK 
021204 
MOV 4(R1),R4 
MOV Re, RS 
CMPB RS,RY 
BEQ at 
HLT 10 

INC aa 
CMP #400 ,R2 
BE 3$ 
DEC R3 
BNE 4g 
ISR PC, SILOLD 
MOV #73,R3 

R 1$ 


B 
SCOPE 


PAGE: 


;IF BITSTUFF SCHAR IS MINUS NUMBER 
; T T AT 


;R3 1 R COUNT 
; CLEAR LU LOOP IN MAINT REG 
;LOAD POR 
NeXT HOR WORD IS witty Her ROMCLK PC=S304 
; LOAD S1L0 SOUITH CO COUNT PATTERN 
;SYNC RECEIVER AND GET IT ACTIVE 
s CLOCK IN 73 CHARACTERS 


T FOR Y 
;NEXT WORD AS INSTRUCTION, ROMCLK PC=S304 
; PORTH IN DATA 

LU IN RY 

‘PUT ate Kiakend IN RS 

:1$ DATA CORRECT 


:B Y 
;DATA ERROR 
; NEXT CHARACTER 


: 


YES 
: DECREMENT CHARACTER COUNT 
:BR IF SILO NOT EMPTY 
;LOAD SILO WITH MORE e COUNT PATTERN 
sREL OAD CHARACTER COUN 


NUE 
:SCOPE THIS TEST 


tae aeat ar TEST 4O ReRHRERLERSALSR ERASE AL SSAEA 
; #RECEIVER ABO ABORT 


ne LOS INDICATING THAT, THE RECEIVER RECOGINIZED 
j THE ABORT SEQUENCE (8 CONTIGUIOUS 1°S) 
; EERE AERRRAE AERA ERASERS EEAR ER EEE RRA EAARA RARER EELES ERE ERERELID 


; TEST 42 
Mov #42, TSTNO 
MOV #7ST43, NEXT 

:R1 CONTAINS BASE DMC11 ADDRESS 
MSTCLR ‘MASTER CLEAR DMC11 
CLR 4(R1) “pt 
ROMCLK :NEXT WORD IS INSTRUCTION RONCL 25304 
122117 :PUT LINE UNIT IN BITSTUFF M 
JSR PC, CLRIO ;00_ THIS AFTER MODE Ie § SET 
MOV eBiTi1, (RL) :SET LINE UNIT LOOP 
ISR PC, CHAR sL O00, SIL0 UNITH 3 FLAGS 
ISR PC, OUTRDY jHALT FOR OUTRDY 
ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
122110 :LOAD 2ND 301 CHARACTER , 
CATACLK, 73 teLOCK THE 301 IN AND 12 EXTRA TICKS 


ocg2 


OZDMF MACY11 30(1046) ILl-JUL-77 11:59 PAGE 63 PAGE: OC82 
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4 was 73? 0326Se R PC, INRDY -WAI INRDY 
3585 BS} id3 maar 4 Batcuk MBL fie nate INSTRUCTION, ROMCLK PC=S304 
3550 QB14e4 DIe104 4 Nov (RI) ,RM :PORT¥eIN DB N RY 

l BS tdz9 Bi 848d iluehet MOV #30i,R5 ut SOUND IN ao 
32392 021464 120504 CMPB RS,R4 WAS A 301 RECEIVED? 
3293 021466 001401 BEQ 1$ 
3eH 021470 104010 HLT 10 ;ERROR FIRST a INCORRECT 

021472 004737 032652 1$: JSR PC, INRDY sWALT FOR IN 
32 Bs 1 a7e 04414 ROMCLK iNEXT WORD IS INSTRUCTION, ROMCLK PC=S 
329 15 1244 021244 i a ote 12. 
es Gin pen Bee Ba ag Ae 
7 #3 

2300 021512 012705 900002 MOV #2,R5 tt ee i RS 
3301 O21516 120504 CMPB RS,RY 
3302 021520 001401 BEQ 3$ ibe Fe ‘se 
3303 O21See 104032 HLT 3e ERROR, BLOCK END NOT SET 
330% O2iS52e4 104400 3: SCOPE :SCOPE’ THIS TEST 
ze 
3307 5 RERRERRERARERARERAEAREREEEE TEST 4D £eteeeed teed etetesesesetsee 
3308 ? CABLE TURNAROUND TEST 
33093 ; #CLEAR LINE UNIT LOOP, SET DTR 
3310 #VERIFY THAT MODEM READY IS SET 
33i1  ¥CLEAR DTR, VERIFY THAT MRDY IS CLEARED 
otk Ere erittititiiitittistititiittistitittitiitiicicrirreci criss, 

1 
aai8 ; TEST 43 
3316 O21Se6 012737 900043 001226 TST43: MOV #43, TSTNO 
3317 021534 012737 021710 O0l2i6 MOV 8TST44 , NEXT 
3318 ;R1 CONTAINS BASE DMC11 ADDRESS 
3319 Oeis¥2e 104412 MSTCLR : MASTER Ose DMC 11 
3320 O21S44 032737 O20000 COl3bE BIT #BIT13,STAT1 :1S LINE UNIT M8202? y 
3321 QG21SSe 001004 BNE .+1le : BR IF YES (DO TEST RvEN 4 »N0 LOOP-BACK CONN) 
3322 O215S4 032737 O40000 0136 BIT aBIT14,STATL :1S TURNAROUND CONNECTO 
3323 O21S62 9014S! BEG >} :SKIP TEST IF NO 
3324 921564 9O0S011 CLR (R1) : CLEAR ed UNIT LOOP 
3325 021566 012761 000100 o9ofc004 MOV #100,4(R1) : LOAD PORT % 
3326 021574 104414 ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=S3C4 
2327 021576 122113 122113 {SET DTR 
2328 021600 104416 cO00002 TIMER, 2 ;WAIT b 
3329 021604 104414 ROMCLK : NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
3330 021606 021264 021264 ;PORTY*¢LU13 
3331 021610 O16104 o00004 MOV 4(R1),R4 ;PUT “FOUND” IN RY 
3332 O21614 042704 900223 BIC #223,R4 CLEAR UNWANTED BITS 
3333 021620 012705 000110 MOV #1i0,RS “EXPECTED” IN RS 
3334 021624 120504 cMPB RS, RG tS. MRDY SET? 
3335 Oe2l6e6 00140 BEG 
2336 021630 104011 HLT ll ;ERROR, MRDY NOT SET 
2337 O21$32 O0S061 coOoco4 1$: CLR Y(R1) :CLEAR’ PORTY 
2338 O21636 104414 ROMCLK :NEXT Wore IS INSTRUCTION, ROMCLK PC=5304 
3339 Q2l640 122113 122113 ;CLEAR OTR 
2340 Oelé4e 10441—6 o0000z2 TIMER, 2 
2241 Oele4e 104414 ROMCLK sNEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
Z34e Ce2leéso O21264 021264 : PORT 4eLUL3 
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a3 Os1e8e 042704 
45 0S 


706 104400 


3363 021710 012737 
3364 021716 012737 


021724 104412 
2737 


3 
339 Oee20Se 104400 
SE 


000004 
000223 


o20000 
000010 


Oo0044 
022054 
o20000 
040009 
004000 
000100 


000002 
000001 


033332 


oososo 


oocoo4 


000223 
000154 
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001366 


001226 
001216 


001366 
001366 


oooco4 


o0c004 
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BASIC RECEIVER TESTS 


2s: 


TST44: 


es: 


PAGE: 

MOV 4(R1) RY ;PUT =F OUND” IN RY 
BIC #223,R4 :CLEAR UNWANTED SITS 
CLR RS : PUT “EXPECTED™ IN RS 
BIT 081713, STATI 15 LINE UN UNIT M8202? 
BIS aot, RS : MRDY st? ON M8202 
CMPB —saRS,R :1S MRDY CLEAR? 
BEQ 2g" 
HLT Il sERROR, MRDY NOT CLEAR 
SCOPE :SCOPE THIS TEST 

5 ERRERREA REALE RAR ALA EAE EL ELE TEST YY HERS RSELLSLE RES ESSE ESAS SE 

!#CABLE TURNAROUND TES 

-#CLEAR LINE UNIT LOOP, LOAD OUT DATA SILO 

pea THAT ALL MODEM SIGNALS ARE SET 

s LERKRELAASSERLAARAAA LALA LAR LALALALSLELAALALEAALALAALAAFALERALEL 
; TEST 
Mov #44, TSTNO 
MOV aTSt4s NEXT 

:R1 CONTAINS BASE DMC11 ADDRESS 

MSTCLR *MASTER CLEAR DMC11 
BIT #81713, STAT! :IS LINE UNIT M8202? om 
BNE +12 :BR IF YES (D0 TEST EVEN IF NO LOOPBACK CONN’ 
SIT wiry, STATI ?IS TURNAROUND CONNECTOR ON? 
BEQ 1$ :SKIP TEST IF NO 
MOV #SITL1,(R1) : SET LINE UNIT LOOP 
MOV #100, ° 4(R1) OAD PORT 
ROMCLK NEXT wokb IS INSTRUCTION, ROGMCLK PC=S304 
122113 ; CLEAR ALL MODEM SIGNALS, EXCEPT STR” 
TIMER, 2 T 
MOV #1,4(R1) {LOAD P 
ROMCLK : NEXT ORD IS INSTRUCTION, ROMCLK PC=5304 
122111 T SOM 
JSR RS ,MESLD PILL OUT DATA SILO 
NESDAT WITH 64 CHARACTERS 
MOV #50, RO : PREPARE FOR DELAY 
CLR (RL) :CLEAR LINE UNIT LOOP 
ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
021264  SORTH*LU13 
MOV 4(RL), RY :PUT “FOUND” IN R 
BIC #223, R4 ; CLEAR UNWANTED SITs 
MOV #1S54'°RS :PUT “EXPECTED” IN RS 
CMPB ses RS, RG :COMPARE EXPECTED AND FOUND 
BE 1$ :5R IF OK 
DEC RO :DEC DELAY COUNT 
BNE 23 :BR IF NOT ZERO 
HL 11 ‘ERROR, ALL SIGNALS ARE NOT SET 
SCOPE :SCOPE THIS TEST 


;ekeeetasaceaeeeerasecaaeeese TEST 45 tttraaeteaarererereraetrerer 


0084 


HO?” 
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399 ;#TEST OF CRC OPERA TION 
oo iu NG THE CRC.CCIT POLYNOMIAL SINGLE CLOCK THE CHARACTER 
3401 RIFY THE LSB OF THE BCC ON EACH SHIFT 
3402 Nest TRANSNT TTER FIRST THEN THE RECEIVER BCC 
mh s SRELLAREAAALSREARARARAAAAALA RA LA LRAAAAASAARAAASLALEALAAALALA FAAS 
aie ; Test % 
3407 022054 012737 OO004S 001226 TST4S: MOV #45, TSTNO 
3408 Oe20b2 0120737 O2e2420 OOlel6 MOV stetue NEXT 
3499 022070 012737 O2el2e4 01220 MOV #64$, LOCK 
3410 RI CONTAINS | BASE DMC11 ADDRESS 
3411 022076 104412 MSTCLR :MASTER CLEAR DMC11 
3412 O22100 005061 oo0004 CLR 4(RL) CLEAR PORTY 
3413 022104 104414 ROMCLK ‘NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
3414 O22106 122117 122117 ‘PUT LINE UNIT IN BITSTUFF MODE 
3415 022110 004737 033374 JSR PC, CLRIO :DO THIS AFTER MODE IS SET 
3416 022114 005037 033612 CLR BITCON ‘CONSECUTIVE 1’S COUNTER INIT TO 0 
3417 O2ele0 612711 o004000 MOV sBIT11,(R1) :SET LU LOOP 
3418 022124 004737 033374 64S: JSR PC, CLRIO :CLEAR BCC REGISTERS 
3413 922139 pos0¢ CLR RO :START SHIFT COUNTER AT ZERO 
4 l l 102010 033030 MOV wcRC.CCITT, .XPOLY} LOAD POL LYNOMIAL FOR SOF THARE Bcc 
4 M 
454 BSStg2 Baezae pOQgRP Seeee Hex Bg BS te BB GOP ithe “Bet 
3423 022152 005137 O22206 COM 673 AT - 
3424 Oeel 004737 033034 JSR PC, BCCLD er TOUT SILO WITH 2 SYNCS 
3425 Oeel 0 AND THE CHARACTER 0 
3426 022164 10441£ o00Ce! DATACLK, 21 GET TRANSMITTER ACTIVE 
3427 022170 104415 9O0000! 6S$: DATACLK I ‘SHIFT BCC ONC E 
3428 022174 005200 INC "RO ‘BUMP SHIFT COUN 
3429 022176 004537 032706 JSR RS, SIMBCC ; CALCULATE SOF THARE acc LSB 
3430 O22e02 000001 1 HIFT 
3431 022204 6S: 0 DATA, CHARACTER 
3432 Oe2e06 000000 675: 0 
RE GEL? RUG? onan ae eee 
B | = 
asc sssig 834K7 Bee OSS et pPRRO ce Toe ts TER Bee 
3436 022220 104012 HLT 12 ERROR BCC is IS SET 
146 68¢: GETG cE ks 
cf ASSS55 atte 033 $ ep Ba GETGO : ONT BARE TRANSMITTER BCC LSB 
3439 622230 10340! Bcs 69$ -BR IF HARD BCC LSB IS SET 
440 Seeeie 104016 HLT 16 ‘ERROR, HARD BCC LSB IS CLEAR 
yy 2 633: 
442 022234 006037 022204 ROR 66S ;SHIFT SOFT DATA 
3443 peee40 13737 033032 0o2220€ MOV CALBCC 67% ‘LOAD OLD SOFT BCC 
44 2700 o00010 CMP #10,R0 : DONE YET? 
3445 Oe2eS2 001346 BNE 65$ -BR IF NOT DONE 
3446 022254 104401 SCOP1 :SCOPE SUBTEST (SWO9=1) 
3447 Oe2e2S6 012737 O22264 oo1220 MOV #71$, LOCK :NEW SCOPE 1 
2448 O22264 004737 033374 71S: JSR Pc, CLRIO -CLEAR BCC REGISTERS 
sie We 0127 ° 010 032030 ot acre, CCITT, XPOLY: Cong ea nana SOF HARE 8 
i 2 x cc 
a2] 355500 Bisea7 dooo00 822959 MOV 80,73 ;LOAD CHAR OR SOFTHARE Ste 
M452 O22306 005037 022346 CLR 74g : CLEAR R OLD SOFTWARE SCC 
3453 022312 006137 Oe2246 CoM 74g :S 
3454 O2231— 004727 923034 ISR PC, BCCL fet TOUT SILO WITH 2 SYNCS 
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ne 


os 


022414 
022416 


a 


104401 
104400 


012737 
012737 
012737 


104412 
005061 
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Boo0e 


032706 


033160 
033160 


022344 
033032 
000019 


OCOO46 
023012 
022470 


033374 
102010 


033034 


000021 
033612 
022554 


022346 


001226 
001216 
001220 


033030 
022570 
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IO? 


PGE : 


BASIC RECEIVER TESTS 


72$: 


TSTYE: 


643: 


Baracix, ; 32 fan Rete ven gcYi ve 


DATACLK 

INC "RO 

JSR RS, SIMBCC dda EO Toe BCC LSB 

! sDATA CHARACTER 

BCS 75$ :BR IF SOFT BCC LSB IS SET 

a ATP BRD Bcc Lee Ts CLEAR 
At | e oh ace bse fe se? 

a pe ce Tar " THK RECEIVER LS 
Bee 76% re: pA OAO Bice rEd FE Bee 

HLT 17 + ERROR, BCC LSB IS CLEAR 

ROR 73$ :SHIFT SOFT DATA 

MOV CALBCC, 74S “LOAD OLD SOFT BCC 

CMP #10,RO ; DONE Yer? 

BNE 72 T DONE 

SCOP1 : SCOPE MTEST (SWO9=! ) 

SCOPE :SCOPE THIS TEST 


Dees tee ete ts yee TEST YQ RRERRARRSERESAE EES ESSA EE ZEE 

:¥TEST OF CRC OPERATION a 

s FUSING THE at CCITT POLYNOMIAL, SINGLE te THE CHARACTER 
VERIFY THE LSB OF THE Bcc’ ON EACH SHIFT 

Test TRANSMITTER FIRST THEN THE RECEIVER BCC 

5 LELHSALAKH RADHA RARE SASK AK SRARLA AREAL AAARERSASEAL TSA LARALLAE REL 


; TEST 46 
Mov #46, TSTNO 
MOV eTST47 NEXT 
MOV #64$ LOCK 
:R1 CONTAINS BASE DMC1! ADDRESS 


MSTCLR ?MASTER CLEAR DMC11 
CLR 4(RL) :CLEAR PORTY ; 
ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=5204 
122117 PUT LINE UNIT IN BITSTUFF MODE 

JSR PC. CLRIO 00 THIS AFTER MO 

CLR BITCON ; CONSECUTIVE 1’°S COUNTER INIT TO 0 

MOV BBIT11,(R1) -SET LU LOOP 

JSR PC, CLRIO ict EAR R BC : REGISTERS 

CLR RO HIFT COUNTER AT ZERO __ 

MOV #CRC.CCITT, XPOLY! STi TOOL YNOMTAL FOR SOFTWARE BCC 

MOV #377 ,66$; ‘LOAD CHAR FOR SOFTWARE BCC 

CLR 67§ ‘CLEAR OLD SOFTWARE BCC 

COM 67$ : TAT - * 

JSR PC, BCCLD LOAD eT 8 Q ITH § 3 SYNCS 

Po AND T 

BATACLK, 2! ‘GET TRANSMITTER ACPI ve 

CLR BITCON :CLEAR BIT COUNTER 


GO8E 


JO? 


DZDMF MACYLL 30(1046) Ll-JUL-77 11:59 PAGE 6&7 PAGE: 0087 
ZDME.P11 L2-MAY-77 14:18 BASIC RECEIVER TESTS 
65S: ACLK, FT C 

Jetd Assedq Apidds 90994 QEARCLK ne reece rete Fo SU SFFING ZEROS 
3513 022554 00 60$: 0 

3514 O225S6 000001 1 SET ge 

3515 022560 005200 INC RO ‘BUMP SHIFT COUNT 

3516 O22S62 004537 032706 ISR RS, SIMBCC ; CALCULATE SOFTWARE BCC LSB 
3517 OG2eS66 000001 l 

3518 022570 o00000 b6$: 0 !DATA CHARACTER 

3519 022572 000000 673: 0 OLD BCC 

3520 022574 103405 BCS 68 :BR IF SOFT BCC LSB IS SET 

3521 022576 004737 033146 ISR PC ,GETQ0 eT HARDER TRANSMITTER BC BCC LSB 
3255 Spas ee HLT le Enno, "Bc LSB fe st? 

3524 022606 OO0404 BR 69S ONT NUE” 

3525 10 004737 033146 68$: ISR PC. GETQO ‘ery HARDWARE TRANSMITTER BCC LSB 
3526 Oe2614 103401 BCS 6c$ -BR IF HARD BCC LSB IS SET 
3527 O22616 104016 HLT 16 ‘ERROR, HARD 8CC LSB IS CLEAR 
3528 022620 69S: 

3529 022620 013737 022570 o22554 MOV 66$, 605 

3530 022626 006037 022570 ROR 66$ ;SHIFT SOFT DATA 

3531 O22632 013737 033032 O22es72 MOV CALBCC,67$ : LOAD OLD SOFT SCC 

353¢ 022640 022700 o00010 CMP #10,RO ; DONE YET? 

3533 Oc2644 001337 BNE 65$ ‘BR IF NOT DONE 

3P3¢ op M3797 S& 001220 i 71$, LOCK scare SUBTEST neni 

5 
35 BSsPep 4737 fssest 718: ISR g,ECRIO CLEAR bce REGISTERS 
2 4 737 iy TT, XPO yi iL TNOMTAL FOR A Sor Tusk gcc 
# L BULL 

ge3g GS5e53 Biseee ApeOIO Bag030 NOV is re ey PU a a 

3540 022700 905037 S270 CLR oy us ihe BR OL D SOFTWARE 8CC 

ue 

3eq3 Bs5704 rate aSSa34 538 PC, BCCLD ‘LOAD out t stro WITH 2 SYNCS 
3543 022714 000377 377 :AND THE CHARACTER 377 

3544 022716 104415 000032 DATACLK, 33 :GET RECEIVER ACTIVE 

3545 022722 104415 000001 72%: DATACLK: l :SHIFT BCC ONCE 

3546 022726 005200 INC RO ‘BUMP SHIFT COUN 

3547 022730 004537 032706 JSR RS, SIMBCC : CALCULATE SOP THARE gcc LSB 
3548 022734 000001 1 :ONE SHIFT 

3549 022736 000000 73$: 0 ;DATA CHARACTER 

3550 022740 og0000 74: 0 : OL 

3551 O22742 103405 BCS 75$ BR IF SOFT BCC LSB IS SET 
3552 022744 004737 033160 ISR PC GETOI !GET HARDWARE RECEIVER BCC LSB 
3553 022750 103006 BCC 76$ :BR IF HARD BCC LSB IS CLEAR 
3554 Oee7S2 104013 HLT 13 ‘ERROR, BCC LSB IS SET 

3555 022754 O00404 BR 76 : CONTI 

3556 022756 004737 033160 75$: JSR PC GETQI :GET HARDWARE RECEIVER 8CC LSS 
3557 022762 103401 BCS 76$ :BR IF HARD BCC LSB IS SET 
3558 022764 104017 HLT 1? ‘ERROR, BCC LSB IS CLEAR 

3559 022766 763: 

3560 022766 006037 022736 ROR 73 ;SHIFT SOFT DATA 

3561 022772 013737 023032 022740 MOV CALBCC, 74S LOAD OLD SOFT gcc 

3562 023000 022700 9O000i0 CMP 810,R0 :DONE YET? 

3563 023004 001346 SNE 728 :BR IF NOT DONE 

3564 023006 104401 SCOP “SCOPE SUBTEST (SWO9=1) 


3SE5 023010 104400 778: SCOPE ;SCOPE THIS TEST 


KO? 


Ree Pl MACY11 30( 1046) owe 11:5$ PAGE 68 PAGE: 0088 
cDME.P11 4:18 


2 12-MAY-77 1 BASIC RECEIVER TESTS 
3567 
3568 peenseenseeererornn TEST 47 HRRRERLSRAS EAE SRAS ELSES ERE 
3569 peTEST OF were OPER 
200 J HE CRC Pee TT 1} "POL mona, on uNakE CLOCK THE CHARACTER 
: # 
367. He vente Ti R BSC THEN HE RECE HER ie 
357 + RHSASKRAEAAREEAASRAL ALARA AAAAAAARERAAALAAAAAT SALA LAAALA LALA LAE 
3574 
Tey ; TEST 47 
3577 023012 012737 O00047 001226 TST47: MOV #47, TSTNO 
3578 023020 012737 023356 001216 MOV wietep NEXT 
3579 023026 012737 023062 001220 MOV #64$, LOCK 
3580 ;R1 CONTAINS BASE DMC11 ADDRESS 
3581 023034 104412 MSTCLR ‘MASTER CLEAR DMC11 
3582 023036 005061 900004 CLR 4(R1) ‘CLEAR PORTY 
3583 023042 104414 ROMCLK iNEXT WORD IS INSTRUCTION, ROMCLK PC=S204 
3584 023044 122117 122117 T LINE UNIT IN BITSTUFF MODE 
85 023046 004737 033374 JSR PC, CLRIO ‘50 THIS AFTER MODE IS SET 
86 023052 033612 CLR BITCON i CONSECUTIVE 1’S COUNTER INIT TO 0 
sepa Gea0ee b04737 033374 | 64S TSR pecuRtO te RE é 
ASsnee Aodabe PR ORD cheat Bie RENTER AT ZERO 
3590 053070 012737 102010 033030 HOV acRC. ccLTT, ,XPOLY; iL Oe POL YNORTAL EO FOR ae acc BCC 
324} BSai08 pier 3s poo tsa CLR eet *CLEAR OLD SOFT BARE BCC 
3593 023110 005137 023144 COM 67$ :START AT - 
3594 023114 004737 033034 ISR PC ,BCCLD i108 OUT SILO WITH 2 SYNCS 
2595 Oe3120 000125 125 THE CHARACTER 125 
Fe fel [pus SoM "3 al 
3538 B53! NC : MP TOBE CStINT 
3599 023134 004537 032706 ISR RS ,SIMBCC eat SOFTWARE BCC LSB 
3600 023140 000001 1 ‘DAT SHIFT 
3601 Oe 142 cot 0 DATA CHARACTER 
144 673 “OLD BCC 
3603 023146 BCS ab} :BR IF SOFT BCC LSB IS SET 
3604 023150 004737 933146 ISR PC GETQO :GET HARDWARE TRANSMITTER BCC LSB 
3605 023154 10 BCC 69$ :BR IF HARD BCC LSB IS CLEAR 
3606 023156 104012 HLT le sERR BCC LSB IS SET 
3607 023160 O00404 BR $ AT Iku 
3608 0231 004737 033146 69S: ISR PC. GETQO Hea WARE TRANSMITTER BCC LSB 
36039 023166 103401 BCS $ :BR IF HARD BCC LSB IS SET 
3610 023170 104016 HLT l ERROR, HARD BCC Pep IS CLEAR 
3611 023172 $9$: 
312 023172 37 023142 ROR 66S ;SHIFT SOFT DATA 
3613 023176 013737 033032 023144 MOV COLBCC 67% “LOAD OLD »SOFT BCC 
3614 022700 CMP #10,R0 : m6 
3615 023210 1346 NE ocd -BR IF NOT DONE 
3616 O23212 104401 SCOP :SCOPE SUBTEST (SWO9=1) 
3617 023214 012737 023222 001220 MOY #71$,LOCK *NEW SCOPEL 
3618 023222 004737 033374 71$: JSR Pc, CLRIO :CLEAR BCC REGIST ERS 
3619 023226 005006 CLR RO’ ;START SHIFT COUNTER AT ZERO 
320 023230 012737 102010 033030 MOV #CRC. CCITT, XPOLY:LOAD POLYNOMIAL FOR. SOFTWARE BCC 
3%el 022236 012737 O00leS 923202 MOV #125, 7238; :LOAD CHAR FOR SOFTWARE SCC 
322 023244 005037 023304 CLR 74S ‘CLEAR OLD SOFTWARE @CC 


DZDMF MACY11 30( 1046) 


DZOME.P11 l2-MAY-77 14:1 


3623 


005137 
004737 


sar 


104400 


012737 
012737 
012737 
104412 
005061 
104414 
122117 
004737 

37 


12711 
004737 
012737 
005037 
005137 
004737 
104415 


023304 
033034 


000032 
000001 


032706 


033160 
033160 


023302 
033032 
900010 


000050 
923722 
023426 
000004 
033374 
fart 
0040 

033374 
102010 
00022 
023510 
023510 
033034 
000021 


11-JUL-77 
:18 


023304 


001226 
001216 
001220 


033030 
023506 


11:59 PAGE 69 


BASIC RECEIVER TESTS 


72$: 


733: 
748: 


7S$: 


76$: 


“J 
“J 
w 


TSTSO: 


64S: 


COM 
JSR 


nN ACLK, 
DATACLK; 


18k 


LO? 


PAGE : 


74$ ;START AT -1 
PC,BCCLD ;LOAD OUT Deke WEL WITH 2 SYNCS 


32 iB REEEIVER ctives 


;SHIFT BCC ONCE 
RR sirecc fied SOP TARE BCC LSB 


i CHARACTER 


753 IF SOFT BCC LSB IS SET 
PC. GETOI GET HARDWARE RECEIVER Bcc LSB 
76$ :BR IF HARD BCC LSB IS CLEAR 

13 jERROR, BCC LS8 IS SET 

PC, GETQI ;GET HARDWARE RECEIVER BCC LSB 
76$ ‘BR IF HARD BCC LSB IS SET 

1? ‘ERROR, BCC LSB IS CLEAR 

73$ ;SHIFT SOFT DATA 

CALBCC, 74 LOAD OLD SOFT BCC 

#10,RO DONE YET? 


‘BR IF NOT DONE 
‘SCOPE SUBTEST (SWO9=1) 
:SCOPE THIS TEST 


OPERATION 
USING THE CRC.CCITT PL none» SINGLE CLOCK THE CHARACTER 
#252, VERIFY THE LSB OF THE BCC’ON EACH SHIFT 
eT TEST TRANSMITTER FIRST THEN THE RECEIVER BCC 
5 EERE EEERRR RRR ARERERE RARE REAR ESE E AEE EE ALE REE LEAL ERE LEE EES 


; TEST SO 
Mov #50, TSTNO 

MOV #TSTS1, NEXT 

MOV #64$ , LOCK 

;R1 CONTAINS BASE DMC11 ADDRESS 

MSTCLR :MASTER CLEAR DMC11 

LR 4(R1) :CLEAR PORTY 

ROMCLK iNEXT WORC IS INSTRUCTION, ROMCLK PC=5304 
122117 PUT LINE UNIT IN BITSTUFF MODE 
ISR PC, CLRIO :DO THIS AFTER MODE 

CLR 1TCo esate 1°S COUNTER INIT TO O 
MOV #BIT11,(R1) LU L 

JSR PC, CLRIO sb EAR R BCC RE Slane 

CLR RO ‘CTR IFT ¢ E AT ZERO 

MOV #CRC. CCITT, XPOLY: LOAD T OBC THO R SOF THARE BCC 
MOV 8252, 665; :LOAD CHAR ona 'é £ BCC 
CLR 675 :CLEAR OLD OF TARE Wace 
COM 67§ ‘START AT -1 
JSR PC, BCCLD ‘LOAD OUT SILO WITH 2 SYNCS 
252 :AND THE CHARACT 2 
DATACLK, 21 :GET TRANSMITTER ACTIVE 


ooes 


DZDMF MACY11 30( 1046) 
DZOME .P 11 


3ehd GBSIE Abedin 
023500 004537 


04 
3720 023666 eth 


104400 


12-MAY-77 14:1 


11-JUL-77 
8 


000001 
032706 


033146 


033146 
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MO? 


70 
BASIC RECEIVER TESTS 


023510 


001220 


033030 


023646 


933160 
033160 


02364 
03 
000010 


6 
3032 023650 


6S$: 


69$: 


718: 


723: 


733: 
74S: 


758: 


76$: 


773: 


ATACLK, l 
PRE RO 

ISR RS, SIMBCC 
0 

0 

Bcs 68S 

JSR PC. GETQO 
BCC 69$ 

HLT 12 

BR 69s 

ISR PC, GETQO 
BCS 69$ 

HLT 6 

ROR 


CMP #10,R0 
65S 

#718, LOCK 

ISR PC c,CLRIO 


MOV 82S2, 738; 
a 


COM 74S 

JSR PC,BCCLD 
eS2 

DATACLK, 3e 
DATACLK, 1 


C RO 
JSR RS. SIMBCC 


BCs 75 
ISR PC GETQI 
Bcc 76$ 

HLT 13 

BR 76 

ISR PC GETQI 
BCS 76$ 

HLT 17 

ROR 73$ 
MOV CALBCC, 74S 
CMP #10, RO 

NE ? 

SCOP1 
SCOPE 


66$ 
MOV CALBCC 678 


;STAR 
MOV #CRC. CCITT, XPOLY; ‘TOAD POLYNOMIAL 


PAGE: 


iBURP SHIFT. COUNT 


‘CALCULATE SOFTWARE BCC LSB 
!ONE SHIFT 

{DATA CHARACTER 

OR CIF SOFT BCC LSB IS SET 

+E THAROWARE TRANSMITTER BCC LSE 
'BR IF HARD BCC LSB IS CLEAR 
SERROR, BCC LSB IS SET 

: CONTINUE 

'GET HAROWARE TRANSMITTER BCC LSB 


:BR IF HARD BCC LSB IS SET 
ERROR, HARD BCC LSB IS CLEAR 


;SHIFT SOFT DATA 
; LOAD Rall BCC 


NOT DONE 
SCOPE SUBTEST (SWO9=1) 
CLEAR BCC REGISTERS 
T SHIFT COUNTER AT ZERO 
FOR SOFTHRRE BCC 


CHAR FOR SOFTWARE 
;CLEAR OLD SOFTWARE BCC 


| 
TOAD OUT SILO ie 2 SYNCS 


THE CHARAC 
i RECEIVER ACTIVE 
SHIFT BCC re 


: BUMP Saar COUN 
fo E SOF TARE BCC LSB 
;DATA CHARACTER 


: C 
;8R_ IF HARD BCC LSB IS CLEAR 
tthe LSB IS SET 


'GET HAROWARE RECEIVER BCC LSB 
tBR IF HARD BCC LSB IS SET 
TERROR, BCC LSB IS CLEAR 


;SHIFT SOFT pare 
; LOAD OLD SOFT BCC 
i Ses 


Cob ot DONE 
8B E SoBTEST (SWO9=1 ) 
:SCOPE THIS TEST 


pOLSSSSDEREREESRROESEUEEORED TEST Sl] 4eeRReeeeRRRESERARERRALAREG 


;#TRANSMITTER CRC T 


; #USING THE CRC.CCITT "POLYNOMINAL, SINGLE CLOCK A GINARY 


0090 


OZOMF MACY11 30( 1046) 
12-MAY-77 i4:18 


DZOME.P11 

3738 
3736 
3737 
3738 
3739 
3740 023722 
3741 37 
3742 
3743 023736 
3744 023740 
3745 023744 
anu? 53750 
3748 023754 
3749 3760 
3750 023764 
3751 023766 
3752 3770 
3753 023772 
3754 023776 
3755 
3756 024010 
3757 024014 
3758 
3759 
3760 O240e4 
3761 = 
378 024034 
3764 024036 
3765 O24040 
3766 O24044 
3767 O24046 
3768 024050 
3769 024054 
3770 24060 
3771 OQe4064 
3772 024070 
3773 Ge24074 
3774 024100 
3775 024104 
3776 024106 
3777 024110 
3778 024114 
37793 petite 
3780 Oe41 
3781 Oe4lee 
3782 024124 
3783 024130 
3784 Oe413e 
3785 Oe4134 
3786 024136 
3787 O2414e 
3788 024144 
3789 

024146 


004537 


11-JUL-77 


000051 001226 
O24e44 001216 


000004 


033374 


033030 


033474 


032706 


033146 


033146 
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NO? 


BASIC RECEIVER TESTS 


;#COUNT PATTERN, VERIFY THE LSB OF THE TRANSMITTER BCC ON EACH SHIFT 
5 RARER ER EERE AEE REA EER EA EER EA AERA ARLE SAREE EE ERASE REESE EE EE 


TSTS1: 


; TEST S1 
Mov #51. TSTNO 
MOV eTStS2, NEXT 
MSTCLR 

CLR 4(R1) 
ROMCLK 

122117 

JSR PC, CLRIO 
CLR BITCON 
MOV #B1T11,(R1) 
CLR R3 

CLR RY 

CLR RS 

CLR ug 

COM 45 

MOV #CRC.CCITT, XPOLY" 
JSR PC, SYNLD 
MOV RY’ 4CR1) 
ROMCLK 

122110 

INC RY 

MOV RY ,4(R1) 
ROMCLK 

122110 

INC R4 

MOV RY, 4(RL) 
ROMCLK 

122110 

JSR PC,OCOR 
DATACLK, 21 

MOV RS, 10$ 
MOV #1°RO 

MOV RS. 3$ 
DATACLK, 1 

ISR RS, STFFCK 
1 

JSR RS, SIMBCC 
fs 

0 

BCS S$ 

JSR PC ,GETQO 
BCC 6$ 

HLT 20 

BR 6$ 

JSR PC ,GETQO 
acs 6$ 

HLT 21 


PAGE: 0091 


;R1 CONTAINS BASE DMC11 ADDRESS 
CCAR ata DMC 11 


ON, ROMCLK PC=S304 
‘PUT rhtee UN 7 IN Tn Bl Tatuet MODE 


;00 T ai AFTER MODE IS ue 
:C ’S — = INIT TO G 


QUNT” 
RY CONTAINS CHAR TO BE LOACED IN 
:RS CONTAINS CHAR CURRENTLY BEING 
CL LEAR Bl ee 


LOAD POL YNOMINAL 
LOAD s1i6 WITH 2 SYNCS, SOM SET 
:PO RIM. *CHAR 
T WORD 1S INSTRUCTION, ROMCLK PC=S304 
te aa TO NEXT CHARACTER 


NEXT “HORD 1S INSTRUCTION, ROMCLK PC=5304 

LOAD OUT DATA 

: INCREMENT TO NEXT CHARACTER 

; PORT4+CHAR ; 

;NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
OUT DATA 


MALT FOR OCOR 


:CLOCK DATA 

START WITH va 

;START COUNT AT 

iL CHAR FOR Sort CRC 

;SHIFT BCC ONCE 

“CHECK BIT STUFFING 
ACTER 


SILO 
SHIFTED OUT 


SOFT BCC 
BR IF SOFT BCC LSB IS SET 
HARDWARE TRANSMITTER BCC LS2 
i IF ok ¢ } 


(CLEARE 
BCC LSB WAS SET 
BRT TRUE WITH TEST 

HARDWARE TRANSMITTER BCC LSB 
:BR IF 0 okt 


: ERROR, BCC “Esp WAS CLEAR 


DZDMF 
DOME .P11 


et vial 


Meteielectar sitet 
—-OWONOW SW O 


& 


itapials 


NEROROOE 
So = 


SEPP PPT y 


FRE 


MACY11 30/1046) 
12-MAY-77 1 


11-JUL-77 
4:18 


024104 


desis 


024116 
033032 


000010 


000400 
000904 


000400 


g000Se2 
024602 


009004 


11:59 PAGE 


72 


BASIC RECEIVER TESTS 


024120 


033930 


11$: 


98: 


TSTSe: 


SCOPE 


PAGE: 


FT CHAR FOR STUFF CHECK 
STUFF CHECK SHIFT COUNT 
Md wot DONE THIS CHARACTER 

T 


FOR Murr CHECK 


Orn rp 
x 
i om) 
nn 
m 


T BCC 
T BIT COUNTER 
ULL CHARACTER YET” 
air COUNTER 


NCREMENT DATA FOR SILO 
ONE BINARY COUNT YET? 


WORD IS INSTRUCTION, ROMCLK PC=S304 
a DATA 


NT DATA 
ONE BINARY PATTERN YET? 


s SRRRSRERAERAERERRERRESRELES TEST SO ReRSERRREEEEEERE SEES EERE ES 


; *RECEIVER CRC TEST 


;#USING THE CRC.CCITT POLYNOMINAL, SINGLE CLOCK A BINARY 


: COUNT PATTERN 


VERIFY THE LSB 
eETtTirititaittettirittiititittittitittictetitry. 


Of THE RECEIVER BCC ON EACH SHIFT 


;R1 CONTAINS BASE DMC11 ADDRESS 
;MASTER CLEAR DMC1! 


:CLEAR PORTY 
:NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
‘PUT LINE UNIT IN BITSTUFF MODE 

:DO THIS AFTER MO 


;2ZERO BIT COUNT 

;R4 CONTAINS CHAR TO BE LOADED IN SILO 

;RS_ CONTAINS CHAR CURRENTLY BEING SHIFTED OUT 
;CLEAR SOFT BCC 

START AT -1 


“LOAD POLYNOMINAL 
;LOAD SILO WITH 2 SYNCS, SOM SET 

: PORTY*CHAR 

!NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
!LOAD OUT DATA 

: INCREMENT TO NEXT CHARACTER 

: PORTH*CHAR 

|NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 


: s SHEARS SARERE 

; TEST Se 

Mov #52, TSTNO 
MOV 8TStS3, NEXT 
MSTCLR 

CLR 4(R1) 
ROMCLK 

122117 

JSR PC .CLRIO 
CLR BITCON 

MOV #BIT11,(R1) 
CLR R3 

CLR RY 

CLR RS 

CLR 4$ 

COM 4§ : 
MOV BCRC. CCITT, XPOLY 
JSR PC, SYNLD 
MOV RY, 4(R1) 
ROMCLK 

122110 

INC R4 

MOV R4Y.4(R1) 
ROMCLK 

122110 


;LOAD OUT DATA 


0092 


DIDMF = MACY11 seni. 
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sea 
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000004 


033160 


033160 


O24444 
033032 


009010 


000400 
o0o004 


000400 


D24446 
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BASIC RECEIVER TESTS 


1$: 
2s: 


10$: 


3$: 
4§: 


cs: 


6$: 


118: 


3$: 


7$: 


INC RY 
MOV RY, 4(R1) 
RONCLK 

122110 

JSR PC,OCOR 
DATACLK, 32 

MOV RS, 108 
INC 10$ 

MOV #10 RO 
MOV RS, 3 
DATACLK, 1 

ISR RS, STFFCK 
1 

ISR RS, SIMBCC 
0 

9 

Bcs c$ 

JSR PC ,GETOI 
BCC 6$ 

HLT 22 

9R 6s 

JSR PC, GETQ! 
BCS 6S 

HLT 23 

ROR 10$ 

DEC RO 

BNE 11 

MOV #10,R0 
MOV RS, 1o$ 
INC 10$ 

INC 108 

ROR 


33 
MOY CRLBCC, 4S 
CMP 810,R3 

2$ 
Cun R3 

RY 
CMP #400, RY 
MOV R4,4(R1) 


RS 
CMP twats 


PAGE: 


; NCREMENT TO NEXT CHARACTER 

;PORTS+CHAR 

‘MT We WORD ‘at INSTRUCTION, ROMCLK PC=5304 
oL 


;WAIT POR 

8 

; STAR WITH H ZERO 

TRANSMITTER i CHAR AHEAD 


= ¢ 
LOAD a FOR SOFT CRC 
; CHECK Bit STUFF ING 
SH IFT COUNT 
5 CALCULATE SOFT BCC 
pal SHIFT COUNT 


;OLD SOFT BCC 
:BR IF SOFT BCC LSB IS SET 


RECEIVER SCC LSB 
;BR IF ok K (CLEARED ) 


ERR WAS SET 
CONTI AUE WITH TEST 

1 HARDWARE RECEIVER BCC LSB 
-BR IF ok ¢ 


; ERROR, BCC tg WAS CLEAR 


; SHIFT CHAR FOR STUFF CHECK 


'RESET BIT COUNT TO 10 
R5aD NEXT CHE? FOR STUFF CHECK 
‘TRANSMITTER IS 2 CHAR AHEAD 


;SHIFT SOFT pare 

:LOAD OLD SOFT BCC 

; INCREMENT BIT COUNTER 

; DONE gt CHARACTER YET? 
TRESTART BIT COUNTER 
; INCREMENT DATA FOR SILO 
; DONE es COUNT YET? 


 PORTH+ 4eDAT 
;NEX XT WORD + INSTRUCTION, ROMCLK 
D OUT 7 hat 


INCREMENT DAT 
; DONE tai PATTERN YET? 


:BR 
; SCOPE THIS TEST 


¢25304 


SHeReeRERRRR RRA RARERERARAAE TEST OD Aaeseeeeeeeseseaasseeaaeetes 
: #TRANSMITTER BITSTUFF CRC TEST 


0093 


DONE ACYL 30( 1046) 


OZOME.P 11 
3903 


BBDDD DBD DD 
DOVITW£WM-OD 


te 


025006 
025010 


le- MAY-7 é 


012737 
012737 


104412 
005061 
104414 
122117 
004737 
005037 


012711 
012704 
005037 


000404 
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000053 O0lecb 
025304 OO0lelt 


000004 


033374 
033612 


033306 
033306 
032044 


000022 


OeS0e6 
102010 
024756 
032706 


033032 
000001 


032012 


033030 


024760 
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PAG 
BASIC 


DO8 


ECEIVER TESTS 


TSTS3: 


12$: 


67$: 
10$: 


64S: 


; #BOTH 


;#THIS TEST TRANSMITS A FOUR CHARACTER MESSAGE WITH CRC 
DATA AND THE BCC ARE yene ie IN THE BIT 


SHTNDON. THE FOUR CHARACTERS ARE 0,125,252, 377 
ere TRANSMITTER IS CHECKED FOR cOtNG tO AMARK STATE AFTER THE BCC 


PAGE: 0094 


s RERSREASRARRASSAASSS AERA LARA LAALRALA SALA AAA AAA LAA SALA AL ALA LLE 


; TEST S3 


Mov #53, TSTNO 
MOV eTStS4 NEXT 


MSTCLR 


CLR 4(R1) 
ROMCLK 


122117 
JSR PC CLRIO 
CLR BITCON 


;LOAD OUT DATA SILO 


MOV sBIT11 (RL) 
MOV #MESDAT,R 
CLR 10$ 

COM 108 

MOV #4, RO 

ISR PC’ SYNLD 
JSR PC’ OUTRDY 
JSR RS; MESLD 
NESDAT 

ISR PC ,EOM 
JSR PC‘ EOM 
JSR PC’ OCOR 
CLR R 
DATACLK, 22 

MOYB ' (R4)+,RS 
MOV RS,Re 


;R1_ CONTAINS BASE DMC11 ADDRESS 
iMASTER CLEAR OMC11 


NE DI 
;PUT LINE UNIT IN BIT TSTUFF MCDE 

ER MODE IS SE 
:CONSECUTIVE 1°S COUNTER INIT TO O 


;SET LINE UNIT LOOP 
;LOAD POINTER TO DATA 
CLEAR SOFT BCC 
;LOAD CHARACTER. COUN ees 
;LOAD SMELAG CHARACTERS IN OUT SILC 
WAIT FOR OUTRDY 

‘LOAD SILO WITH 4 CHAR MESS 
; ADDRESS OF MESSAGE 

R OF CHARACTERS . 
SLOAD GARBAGE CHARACTER, WITH EOM SE? 


;WAIT FOR_OCOR 
;CLEAR BIT COUNTER 
; CLOCK DATA 

;LOAD RS WITH CHAR 
‘OAD Re WITH CHAR 


;CHECK FIRST FOUR CHARACTER MESSAGE 
;IN THE BIT WINDOW (0, 125,252,377) 


MOV 
MOV ReaC Sort, XPOLY’ 
MOV RS,67$ 

JSR RS'SIMBCC 

10 

: 

MOV CALBCC, 10$ 
DATACLK, I 

RORB 

BCC éss 

JSR PC GETSI 

Bcs 66$ 

HLT 6 

BR GES 


; LOAD FOR STUFF CHECK 


;L0AD SO 
i CALCULATE 6 ds Bcc 
; SHIFT COU 


OL D BCC 
;LOAD SOFT BCC FOR NEXT SHIFT 
; SHIFT DATA hook” BIT WINDOW 


I (MARK 
:ERROR, BIT WINDOW WAS A SPACE 


ou 


4 
S INSTRUCTION, ROMCLK PC=S304 


OZOMF  MACY11 30( 1046) 
DZOME.P11 14 


3989 


025100 


ERI RO ROR 
FESFHERNVSTWORLSo 


12-MAY- 


004737 
103001 
006 


004537 
000000 


00135 


A pe -77 11:59 PAGE 
03201e 6S$: 
66$: 
033474 
71$: 
025026 
000010 
033032 
033032 
025126 
000001 633: 
032012 
032012 69$: 
70$: 
033474 
723: 
025126 
090029 
000176 O01252e 
000091 738 
001252 
032012 
032012 74$: 
75$ 
006910 


75 
BASIC RECEIVER TESTS 


E08 


PC GETSI 
bes 


RS, STFFCK 


R2,71$ 
R3 
#10,R3 
64S 

R3 


RO 
12$ 


PAGE : 


;LOOK_AT a) WINDOW 
BR IF OK ACE ) 
ERROR, BIT WINDOW WAS A MARK 


;SHIFT FOR ta STUFF CHECK 
;BUMP BIT COUNTER 
; DONE 4 8 BITS YET 


CLEAR BIT COUNTER 
:DEC CHARACTER COUNT 
:BR IF NOT DONE YET 


;CHECK BCC FOR PRECEDING MESSAGE IN THE BIT WINDOW 


COM 


CALBCC 


CALBCC RO 


RS ,STFFCK 


RO,72$ 
R3 
#20,R3 
6e% 

R3 


;ADJUST BCC FOR SOLC 
;PUT BCC INR 
er see FOR ys CHECK 


a EAR 
iu “itN00s 
ERROR CR MURONG ( SPACE} 
TOOK AT at WINDOW 
:BR IF OK (SPACE) 
ERROR, CRC WRONG (MARK) 
; CHECK BCC CHAR FOR ZERO STUFFS 
i 
SHIFT COUN 
; SHIFT Sor Tac ONCE 
;SUMP BIT COUNTER 
FIN NISHED BCC YET? 


F NO 
CLEAR BIT COUNTER 


;CHECK FOR FLAG TO FOLLOW BCC 
#tB« sieht ,TEMP3 ;PUT FLAG CHARACTER IN TEMP3 


MOV 


"TEMP3 
74 


=CL LOUK FLAG ONCE 


;LOOK Ay ett WINDOW 
ERROR IN FLAG CHAR 
31008 AT BIT WINDOW 


R IF Ok 
: ERROR + FLAG CHAR 
:INC BIT COUNT 


: FLAG one YET? 
:BR IF NO 


0093s 


Sen 


ae 


FOS 


jmacya 301046) 11-JUL-77 11:59 PAGE 76 PAGE: 
12-MAY-7 BASIC RECEIVER TESTS 
025222 005003 CLR R3 ;CLEAR BIT COUNT 
:CHECK TO SEE IF TRANSMITTER IS MARKING 
pees ious 000001 2g: DATACLK, 1 ; CLOCK ay RANSMITTER 
032012 ISR PC,GETSI : LOOK WINDOW 
103401 BCS 3$ ie i 
024 HLT 34 RROR, B17 WAS 8 SRK EBC 
3 38: INC R3 
O2S2e42 022703 000007 CMP #7 ,R3 meg 
025246 001366 BNE 2s iBR 
104415 000010 DATACLK, 10 :GIVE ENOUGH TICKS TO CLEAR OUT ACTIVE 
025254 005003 L :CLEAR BIT COUNTER 
025256 104415 000001 4$: DATACLK, l :SHIFT OUT NEXT BIT 
O2S262 004737 O32012 JSR PC, GETSI ‘LOOK AT BIT WINDOW 
025266 103401 BCS 44 :BR IF IT IS A MARK 
025270 i9age4 HLT 24 : ERROR TRANSMIT ER IS NOT MARKING 
025272 203 INC R3 INC bir ¢ 
025274 g22703 oco0020 CMP #20,R3 :00 NE Y 
025300 001366 BNE 4§ REN 
0e5302 104400 S$: SCOPE BB E Hors TEST 


s RHRSERRARERSRRARAERRAEEREEE TEST SY Seekbeeeeeeeeeeeeeeeeteeeses 
; #REC IVER BLT SIUtr CRC TEST 
THIS TEST CLOCKS A FOUR CHARACTER MESSAGE WITH BCC 
* SAND VERIFYS CORRECT DATA RECEPTION > BCC MATCH 
it THE FOUR CHARACTER MESSAGE IS 0, 125,2 
ihe A Dee ote RT 5 Ae 


; TEST S¥ 
025304 912737 900054 001226 TSTS4: MoV 54,7 
025312 B1337 Oes5e6 01216 MOV iratse. NEXT 


;R1_ CONTAINS eS DMCi1 ADORESS 


025320 104412 MSTCLR MASTER CLEAR OM 
025322 O0S061 900004 CLR 4 (RL) !CLEAR PORTY 
e626 108414 ATE sNEXT “WORD ein eee ROMELK FC=E304 
A564o 33974 $B? oe corto Tate abER AO ooe 12 ¢ 
025336 012711 o04000 MOV eBIT11, (RL) T Line UN 
025342 012702 033614 MOV BMESDAT, Re ‘AD POINTER 16 OORTA 
025346 012700 O00004 MOV 84, RO !LOAD CHARACTER COUNT 
025352 0047327 033176 JSR PC’SYNLD :LOAD 2 FLAG CHARACTERS IN OUT SILO 
025356 004737 032176 JSR PC’ OUTROY :WAIT FOR OUTRDY 
025362 004537 033332 JER RS'MESLD ‘LOAD SILO WITH 4 CHAR MESS 
033614 MESDAT ADDRESS OF MESSAGE 
025370 4 iNY HARAC TERS 
025372 004737 033306 JSR PC,EOM LOAD GARBAGE CHARACTER, WITH EOM SET 
025376 004737 033396 JSR PC.EOM 
025402 004737 032044 JSR PC’ OCOR WAIT FOR QCOR 
025406 104415 O00115 DATACLK, 115 :CLOCK_DAT 
025412 004737 O22bS2 3: JSR PC. INRDY WAIT FOR IN RDY 
OeS41— 104414 ROMCLK "NEXT WORD IS INSTRUCTION, ROMCLK PC=S3C4 
025420 021204 021254 :GET IN DATA 


OeS4e2 016104 Oo00004 MOV 4(R1),R4 ;PUT “FOUND” IN R4 


DZOMF 
SSOME. Pll 


4108 


TUTUTUTULUU ee bb 6 8 (9 
INES OWONMUNS lormr-Ow 


MACY 11 ae’ 
12-MAY-77 14 


025564 
025570 Ld 


104042 


104414 
021204 
104400 


ll1-JUL-77 
:18 


032652 


ooo004 
177400 
0326S2 


000004 
000374 
000003 


oco0ss 
027126 


o0o004 


033374 
033612 


004000 
033614 


001252 
001252 


001226 
001216 
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BASIC RECEIVER TESTS 


1$: 


TSTSS: 


PRGE: 
MOVE = (R2) +, RS ;PUT “EXPECTED” IN RS 
CMPB sR, Rv :COMPARE RECEIVED DATA 
BEG 13 F OK 
HLT 10 ‘DATA ERROR 
DEC RO !DEC CHARACTER COUNT 
BNE 3$ :BR IF NOT DONE YET 
-CHECK TO SEE THAT IN BCC MATCH IS SET 
JSR PC, INRDY ;WAIT FOR INRDY 
ROMCLK NEX/ WORD IS INSTRUCTION, ROMCLK PC=5204 
021204 GET FIRST HALF OF CRC 
MOVE  4(R1), TEMP3 :PUT IN TEMPS 
BIC #177400, TEMP3 :CLEAR HI BYTE 
ISR PC, INRDY ;WAIT FOR INRDY 
RONCLK ‘NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
MOV 4(R1),R4 ;PUT “FOUND” IN RY 
BIC #3 374, RY “CLEAR UNWANTED BIT 
MOV 3. RS :PUT “EXPECTED” IN RS 
CMPB HN 'ARE IN BCC MATCH AND BLOCK END SET? 
BEG set 
HLT sIN BCC MATCH ERROR 
ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
021204 : GET 
SCOPE : SEOPE THIS TEST 


s RRARRRAERARRARAEAAASALAAAELE TEST SS SeeReeeeeeeee RESTS ELLA SATEE 
: *BITSTUFF EOM FUNCTION TEST 
“THIS TEST LOADS OUT SILO WITH: 2 FLAGS,4 CHAR MESSAGE ,EOM 


; MESS, EOM. S CKED TO 8 

:#4 CHAR BCC, FLAG, 4 CHAR BCC FLAG, MARKS. THIS TEST VERIFYS THAT 
; #THE CTERS LOADED W ARE LCST 

;#ALL DATA AND BCC’S ARE CHECKED IN THE Bit WINDOW 

;#THE FOUR CHARACTER MESSAGE i 0,125, eSe,377 


aa 
-#RECEIVED DATA IS VERIFIED non BEC MATCH IS CHECKED 
fee Sisdbebsanabtostoseskedocubebvesitensesachsetereatoonsenees 


; TEST SS 
MoV #SS, TSTNO 
MOV 8TSTS6, NEXT 
;R1 CONTAINS BASE gnc ADDRESS 


MSTCLR ;MAST ER CLEAR DME 1 
CLR 4{RL) CLEAR PORTY 

ROMCLK :NEXT WORD Is INSTRUCTION, ROMCLK PC=5304 
l22117 LINE UNIT IN BITSTUFF MODE 

JSR PC cLRIO in "hte AFTER MODE IS SET 

CLR BItco : CONSECUTIVE 1°S COUNTER INIT TO 0 

sLOAD OUT DATA SILO 

MOV #BITLL, (RL) ;SET LINE UNIT LOOF 

MOV aMESOat, RY “| OAD POINTER TO DATS 


0097 


OZDMF  MACYL1 30(1046) L1-JUL-77 11:59 PAGE 78 PACE: coe 
DIDME.P11 12-MAY-77 14:18 BASIC RECEIVER TESTS 
4127 025574 005037 025724 CLR 10$ : CLEAR SOFT Bcc 
i Gee Bere bec a rece 
84, 
4] Bert Bbae heey ea JSR PC'SYNLD tab ne ‘EhakaCTERs IN OUT SILC 
MEP ogsbz0 Sosa? OaaGe Jon RS'MESLD COUT 4. CHAR MESS 
4134 025626 BBe14 1 a al yee 
4135 025630 004737 033306 ISR PC ,EOM MoD GARBAGE CHARACTER, WITH EOM SET 
4136 025634 004737 033306 JSR PC’ EOM 
4137 025640 004537 033332 JSR RS; MESLO FOUR NOR  SHBRACTERS 
4] 44 Th MESDAT ADD iRoek oo 
4] 46 4 4 CHE TERE 
iy fees Geer Ge ag fi 
4142 025660 004737 032044 JSR PC’OCOR ‘Belt 1 EO, OCOR 
4143 025664 005003 CLR R3 :CLEAR BIT COUNTER 
4144 O25666 104415 o00022 DATACLK, 22 : CLOCK DATA 
4145 925672 112405 12:  MOVB  ‘(R4)+,RS5  ~ [LOAD RS WITH CHAR 
#46 025674 019502 MOV RS,R2’ ‘LOAD R2 WITH CHAR 
4148 :CHECK FIRST FOUR CHARACTER MESSAGE 
4h86 :IN THE BIT WINDOW (0,125,252, 377) 
4151 025876 010537 025772 MOV sLOAD FOR STUFF CHECK 
4152 025702 012737 102010 033030 MOV tt Scrrr, XPOLY’ ;LOAD POLYNOMIAL 
4153 025710 010537 025722 MOV RS,67$ sLOAD SOFT CHAR FOR BCC 
4154 625714 004537 032706 JSR RS’ SIMBCC : CALCULATE SOFT BCC 
4155 625720 000010 10 :SHIFT COUN 
4156 025722 000000 67s: 0 Ghawacien 
4157 025724 9000000 10$: 0 cc 
4158 025726 013737 033032 o2s724 MOV CALBCC, 10% ‘LOAD SOFT BCC FOR NEXT SHIFT 
4159 925734 104415 900001 64$:  DATACLK, 1 ‘SHIFT DATA IN TO BIT WINDOs 
4160 025740 106002 RORB Re :SHIFT SOFT DxTA 
4161 Oe5742 103005 C S$ 'BR IF A SPACE 
4162 025744 004737 032012 JSR PC GETSI ;LOOK AT BIT WINDOW 
4163 025750 103406 BCS b6$ -BR IF OK (MARK) 
4164 925752 104006 HLT 6 : ERROR BIT WINDOW WAS A SPACE 
4165 025754 oo0404 BR 66S : CONTINUE 
4166 025756 004737 032012 65$: JSR PC GETSI !LOOK AT eI WINDOW 
4167 025762 103001 BCC b6$ !BR IF OK (SPACE) 
4168 O25764 104006 HLT 6 :ERROR, BIT WINDOW WAS A MARK 
4169 O25766 b6$: 
4170 025766 004537 033474 JSR RS, STFFCK 
4171 025772 oo0000 718: O 
4172 025774 OO00001 1 
4173 025776 110237 025772 MOVE =- Re, 718 :SHIFT FOR NEXT STUFF CHECK 
417s Bee004 22503 op00IO Ne TO. RG i 
4176 naauyts BET ae BNE 64$ :BR IF NO 
4178 Oee014 Sesne ceeStCORG sCLEAR B17 COUNTER, 
4 L L 
4123 Bgeete hes BFE 12 :B IF NOT DONE YET 
4181 :CHECK BCC FOR PRECEDING MESSAGE IN THE BIT WINDOW 
".5¢ 


I08 


DZOMF MACYLL 30(10%6) L1-JUL-77 11:59 PAGE 79 PAGE: 
ZOME.P11 12-MAY-77 14:18 BASIC RECEIVER TESTS 
4183 g26020 005137 033032 COM CALBCC ;ADJUST BCC FOR SDLC 
ie foes Gia? bees RY Rosse hac Ree cnc 
rd , H ~~ 
4186 psee3q 1049415 BBB Hor 68$:  DATACLK,1 eT BRERE Bee 
4187 O26040 ROR RO :SHIFT SOFT BCC 
4188 O26042 103005 BCC bas ‘BR IF CARRY CLEAR 
4189 926044 004737 9032012 ISR ¢.GETSI ‘LOOK AT BIT WINDOW 
4190 26050 103406 BCS 70$ BR IF OK (MARK) ¢ 
4191 O26052 104014 HLT 14 -ERROR, CRC WRONG (SPACE) 
4192 O26054 oo0404 . BR 70$ ; CONT TIAUE 
4193 0260568 004737 032012 69%: | JSR PC, GETSI LOOK AT BIT WINDOW 
4194 QO26062 .03001 BCC 70$ ‘BR IF OK (SPACE) 
4195 926064 [04014 HLT 14 ERROR, CRC WRONG (MARK) 
4196 O26066 70S: 
4197 026066 004S37 033474 ISR RS, STFFCK ;CHECK BCC CHAR FOR ZERO STUFFS 
4198 O26072 9000000 72: O {CHARACTER 
4199 O26074 O0000i 1 SHIFT COUN 
4200 026076 010037 026072 MOV RO, 72% : SHIFT SOFTECC ONCE 
4201 026102 005203 INC R3 :BUMP BIT COUNTER 
4202 026104 022703 000020 CMP #20,R3 FINISHED BCC YET? 
4203 O26110 00135] BNE 68S ‘BR IF NO 
4204 O26112 005003 CLR R3 CLEAR BIT COUNTER 
4208 :CHECK FOR FLAG TO FOLLOW BCC 
4208 O26114 012737 oO00176 o01252 MOV #tB<O1111110>, TEMP ;PUT FLAG CHARACTER IN TEMPS 
4209 O26122 104415 000001 73%:  DATACLK, 1 CLO¢K FLAG ONCE 
4210 O26126 106037 O0l12Se RORB | TEMP3 Suir SOFT FLAG 
4211 Q26132 103405 BCS 745 F BIT IS 
ele Debi 34 4737 032012 SR PC GETS! + OOK AT BIT WINDOM 
4214 ase {dg 183008 HL 26 iBR UF fk FLAG CHAR 
4215 026144 OOO4O4 BR 75% 
4216 O26146 004737 9032012 748: JSR PC. GETSI ;LOOK AT BIT WINDO 
4217 O261S2 103401 BCS 75$ :BR IF OK 
4218 O26154 104026 HLT 26 :ERROR IN FLAG CHAR 
4219 026156 905203 75$: INC R3 :INC BIT COUNT 
4220 026160 022703 900010 CMP #10,R3 ;FLAG DONE YET? 
4221 026164 (001356 BNE 73$ R IF NO 
4222 Obi bb 905003 CLR R3 !CLEAR BIT COUN 
4223 026176 O12? 999004 Nov #4,R0 a :RESET CHARACTER 1QQUNTER 
, ry , 
4552 00 at p335 3 CLR 11§ Toa es 
4Eo7 DoES10 frsuee | Onbete 138: Rove {Ra)4,RS sADIUST To ig" “ - anes 
a = ,s ; J . 
4328 B5esi Athe8s MOY ORS. Re troAD CHAR IN R2 
4230 :CHECK SECOND MESSAGE IN THE BIT WINDOW (0, 125,252,377) 
“e Gebe14 010537 026310 MOV -LOAD FOR STUFF CHECK 
423 012737 102010 023030 MOV eae Sarr, XPOLY” “LOAD POLYNOMIAL 
4234 O26226 010537 026240 MOV RS,79$ LOAD SOFT CHAR FOR 8CC 
4235 Oe6232 004537 032706 JSR RS'SIMBCC CALCULATE SOFT BCC 
423 Oc6236 900010 10 SHIFT COU 
4227 O26240 000000 79g: 9 ‘ TARACTER 
4238 O2t242 900000 Ws: 9 :OLD BCC 


DIOMF = MACY1Li 30: 1046) 
l2-MAY-77 14:1 


Gh GRRE oe 


OZOME.P11 


3 


S 


C264SE 


103005 


103001 
104014 


004537 
pope 
37 
a3 
022703 


a06883 


2737 
104415 


106037 


23006 


032012 
032012 


033474 


026310 
008010 


033032 
033032 
026410 
000001 


032012 
032012 


033474 


026410 
o0cded 


Booka 


001eS2 
032012 


Ll-JUL-?? 
:18 


001252 
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JO08 


PAGE: 0100 


BASIC RECEIVER TESTS 


768: 


80$: 


81$: 


82s: 
84s: 


ess: 


a wneiade iSiPr Bata’ th Fae rAbaL 
Re HIFT SOFT DATA 


'BR IF A SPACE 


OER PC GETSI ‘LOOK AT BIT WINDOW 
Bcs 78 !BR IF OK (MARK) 

HLT 6 ERROR, BIT WINDOW WAS A SPACE 
BR 78$ : CONTINUE 

JSR PC GETS! ‘LOOK AT BIT WINDOW 

BCC 79$ :6R IF OK (SPACE) 

HLT 6 ERROR, BIT WINDOW WAS A MARK 
ISR RS, STFFCK 

1 

MOVB = R2, 83S ; SHIFT FOR NEXT STUFF CHECK 
INC R ; BUM Me BIT 

ae #10,R3 ULL ° “BI S YET 

BNE 76$ ig tN 

CLR RS !CLEAR BIT COUNTER 

BEC RO :DEC CHARACTER COUNT 

BNE 13$ !BR IF NOT DONE YET 

:CHECK BCC FOR PRECEDING MESSAGE IN THE SIT WINDOW 

COM CALBCC ;ADJUST BCC FOR SDLC 

MOV CALBCC RO ;PUT IN RO 

MOV RO, 84S LOAD BCC FOR STUFF CHECK 
DATACLK, | 'SHIFT HARDWARE BCC 
ROR RO SHIFT SOFT 
Bee BS cers RO AT ett MIND 

Bee Ss BR IF O 
HLT 14 : ERROR RC WRONG (SPACE) ; 
ch Bes iON I 

SR GETSI tOok AY BIT WINDOW 
BCC 925 ‘BR IF OK (SPACE) 
HLT 14 ERROR, CRC WRONG (MARK) 

ISR RS, STFFCK ;CHECK BCC CHAR FOR ZERO STUFFS 
1 COUNT 
MOV RO, 84S : SHIFT SOF Tact ONCE 

INC R3 ‘BUMP BIT COUNTER 

CMP #20, R3 “FIN HE ce YET? 
BNE 3 :B 

L 3 ‘CLEAR BIT COUNTER 


;CHECK FOR FLAG TO FOLLOW BCC 


MOV. «- ##BO1111110>, TEMP3_;PUT FLAG CHARACTER IN TEMP 
DATACLK, 1 CL otk FLAG ONCE 
RORB Tp? ay FT FLAG 
1S, HARE 
C GETS! Coot ar a WINDOW 
BCC 97§ 


DZOMF MACYLI we he | 
12-MAY-77 14 


DZOME.P11 


SF Bese 


a 


Be 


104414 


L1-JUL-77 
:18 


03e0ie 


009010 


000007 
000010 


000001 
032012 


o0odeC 


00004 
033614 
032652 


000004 


032652 


ooo004 
422208 
326Se2 


11:59 PAGE 81 PAGE: 
BASIC RECEIVER TESTS 
HAT eb, sERROR IN FLAG CHAR 
863: JSR PC. GETSI :LOOK AT BIT WINDOW 
BC ars R IF OK 
HL 6 ‘ERROR IN FLAG CHAR 
975: INC R3 :INC BIT COUNT 
CMP #10,R3 !FLAG DONE YET? 
BNE a5$ : NO 
CLR R3 :CLEAR BIT COUNT 
sCHECK TO SEE IF TRANSMITTER IS MARKING 
23: DATACLK, l :CLOCK TRANSMITTER 
ISR PC, GETSI :LOOK AT WINDOW 
BCS 3$ :IT SHOULD BE MARKING 
HLT Dy ‘ERROR, BIT Has @ SPACE 
2s: INC R3 : BUMP BIT Co UNTE 
te Bi No A 
DATACLK, 10 :GIVE ENOUGH TieKs TO CLEAR OUT ACTIVE 
CLR :CLEAR BIT COUNTER 
4§; DATACLK, ! :SHIFT OUT NEXT BIT 
Be” ee ‘BR IF IT Is A RARE 
HLT >y : ERROR TRANSMITTER 7S NOT MARKING 
INC 3 NC BIT COUN 
CMP #20,R3 2 YET? 
BNE 4§ :BR IF NO 
ic KT THAT EIRST FOUR. CHARACTER MESSAGE 
He Ree SEB CoRee HES (0,125, Bees 35 
DaTRCLK, ‘ l Laie IT IN IN RECEIVER 
vcs: 5 BERR? ABI Pessoa ounmer tn we 
= RONCLK - NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
Rove tRete Re ‘PUT T “EXPECTED” IN IN RS 
+, oo oe 
cHPE Re RY i "Rete veD DATA CORRECT? 
HLT By TA ERROR 
41$: DEC 4g i Ive BATE. COUNT 
BNE 40S :BR IF NOT DONE YET 
:CHECK TQ SEE THAT IN MATCH T 
ONE THAT THE ace wae Reset ves CORREETLY 
JSR PC, INRDY ;WAIT FOR INRDY 
ROMCLK NEXT WORO Is IS _ENSTRUCTION, ROMCLK PC=5304 
021204 T FIRS OF GR 
2 MOVE 4(R1), TEMP ‘BUT IN FEMP3 
52 Hee #177400, TEMP3 = «:CLE HI BY 
SR ss PC, INDY ;WAIT 


FOR INRDY 
;NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 


DZDMF MACYL1 30( 1046) 
DZOME.P11 


ie A 
se Ree 


Biéfos 


042704 


12-MAY-77 14 


11-JUL-77 
718 
000004 
000374 
000003 
000004 001251 
000377 001250 
001250 O0012Se 
033032 001252 
ooooo4 
pases 
ocooo4 
032652 
000004 001252 
177400 001252 
032652 
000004 
000374 
000003 
003004 001251 
000377 001250 
001250 001252 


11:59 PAGE 


82 
BASIC RECEIVER TESTS 


S0$: 


42$: 
43$: 


44$ ; 


S18: 


piers 


BIC 


LOS 


4(R1) RY 
0374, Ru 


! Bs 


4(R1), TEMP2+1 
#377, TEMP2 

temps TEMP3 

caLece, TEMP3 


27 


PAGE: 


;PUT “FOUND” IN RY 
;CLEAR UNWANTED BITS 


"EXPECTE 

iPr IN Bee ABTCH ane BLOCK END SET? 

;IN BCC MATCH ERROR 

;NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
: AST HALF 


; LO BYTE 

;16 BIT BCC NOW IN TEMP3 
1S IT CORRECT? 

:BR IF OK 


;CHECK TO SEE THAT SECOND FOUR CHARACTER MESSAGE 
WAS RECEIVED CORRECTLY (0,125,252, 377) 


MOV 


sre pa Fe 


4(R1),R4 
(R2)+ "RS 
RS.RY 
yy 
10 
R3 
43$ 


4(R 
(Re 
49$ 


METAR HE RE 


021204 
MOVB 


PC, INRDY 


uhh TEMP3 
400, TEMP3 


4(RL), TEMP2+1 
#377, TEMP2 
TEMPS, TEMP3 


;R3=CHARACTER COUNT 


RO De RSOGE POINTER IN R2 


; NEXT WORD IS INSTRUCTION, ROMCLK PC= 


;PUT “FOUND” IN RY 
mye “EXPECTED” IN RS 
CETYeED DATA CORRECT? 


iE ceive DATA ERROR 
:DEC CHARACTER COUNT 
;BR IF NOT DONE YET 


CC MATCH IS SET 
ECEIVED CORRECTLY 


5304 


NEXT ORO yet INSTRUCTION, ROMCLK PC=S304 
;GET tig Bd OF CRC 


OR_ INROY 
NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 


;PUT “FOUND” IN R 
; CLEAR UNWANTED BITS 


IN RS 
;ARE IN BCC MATCH AND BLOCK END SET? 
;IN BCC MATCH ERROR 
;NEXT oe IF INSTRUCTION, ROMCLK PC=5304 


LO BYTE 
:16 BIT BCC NOW IN TEMP3 


0102 


OZOMF MACY11 30( 1046) 
l2-MAY-77 14:1 


ie ez44g ppe7a7 033032 o01as2 


DZOME.P11 


027122 
027124 


104027 
104400 


012737 
012737 


104412 
005061 


4414 
2117 


10 
le 
pod? 7 
005037 


00 
104415 
lle 
010502 


000056 90l2c6 
030606 001216 


ooo004 


a83e12 


033332 


033306 
033306 
033256 
033332 


032044 
o0n02e2 
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S$: 


TSTSé: 


MOS 


BP EeLec’, TEMPS idR JI CORRECT? 


HLT 27 
SCOPE ;SCOPE THIS TEST 


SAITSTIFF OH FUNCTION TEST TEST SG HR HKAHRSAAE REHASH SE LE EES 
:#BITSTUFF EOM FUNCTION 

pSTHIS, TEST nese OUT nt WITH: 2 FLAGS.4 CHAR MESSAGE EOM 

i s SOR, tare Me He DATA STREAM IS CHECKED TO BE’ 


AG. MARKS. THIS TEST VERIFYS THAT 
“CHBRCTERS: LOAD pote nat eon SET ARE LOST 
OADED WITH BON Te 1S NO? IN THE BCC 
80 o OAT AND Bcc’s S ARE CHECKED IN THE BIT WINDOW 
FOUR CHARACTER MESSAGE IS 0.125, 252. 377 
RECEIVED DATA IS VERIFIED, AND tN BCC MATCH IS CHECKED 
PTET TETTSTETETTTCTTETETETET ESTE TEST CSTE ETS STTTESTTPeTETETTTT ee 


; TEST S6 
Mov #56, TSTNO 
MOV #TStS7, NEXT 

-R1 CONTAINS 5 BASE OMCL1 ADDRESS 


MSTCLR ‘MASTER CLEAR 
CLR 4(RL) :CLEAR PORTY 
ROMCLK NEXT, WORD IS INSTRUCTION ROMCLK PC=5304 
TSR PC.CLRIO se ee et 
LR BS tEDN 2, ils UTIVE 1°S Aca T INIT TO 2 
;LOAD OUT DATA SILO 
MOV #BIT11,(R1) ;SET LINE UNIT LOOP 
MOV aMESDAT, RY :LOAD POINTER TO DATA 
CLR 10$ :CLEAR SOFT BCC 
COM 108 :START AT -1 
MOV 4,RO +. OAD CHARACTER COUN 
ISR Pc’ SYNLD *LOAD 2 FLAG ER ARACTERS IN OUT SILO 
JSR PC’ OUTRDY ‘WAIT FOR OUTRDY 
ISR RS; MESLD *LOAD SILO WITH 4 CHAR MESS 
MESDAT !ADDRESS OF MESSAGE 
4 ; NUMBER OF CHARACTER 
IR PC, EQN ‘LOAD GARBAGE CHARACTER, WITH EOM SET 
JSR PC, SOM LORD GARBAGE CHAR WITH SOM SET 
JSR RS; MESLD :LOAD FOUR MORE CHARACTERS 
MESDAT “ADDRESS OF MESSAGE 
4 ‘NUMBER OF CHACTERS 
JSR PC,E£0M :SET EOM 
JSR PC EOM :SET EOM 
JSR PC’ OCOR :WAIT FOR OCOR 
CLR R :CLEAR BIT COUNTER 
DATACLK, 22 :CLOCK DATA 
MOVB (R4)+,R5 ?LOAD RS WITH CHAR 
MOV RS,Re’ ?LOAD R2 WITH CHAR 


PAGE: 
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4506 
4507 
08 


<= 
ul 
_— 
Oo 


APAAESASSES 
ONO £SWe 


027376 
102019 
027326 
032706 
033032 
000001 
032012 
032012 


033474 


000010 


032012 
032012 


033474 


027476 
000020 
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033030 


027330 
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67$: 
10$: 


64$: 


65$: 


66$: 
71$: 


68$: 


698: 


70S: 
72$: 


NOS 


5 CHECK ri FOUR CHARACTER MESSAGE 
, IN THE WINDGW (0, 125,252,377) 


MOV ;LOAD FOR STUFF CHECK 
MOV Rene Scrtt, XPOLY" “LOAD POLYNOMIAL 
MOV RS,67$ -LOAD SOFT CHAR FOR BCC 
JSR RS SIMBCC ; CALCULATE SOFT BCC 
10 ‘SHIFT COUN 
0 CHARACTER 
MOV CALBCC, 10% ee XT SHIFT 
DATACLK, l T Data Th 10 BIT WINDOW 
RORB ‘Re 
BCC 65S BR 
SR PC GETSI ha rat re F TNDOW 


6 ;BR IF OK (MARK) 
au sERR Rae! WINOOM WAS A SPACE 
B ; CON 
; LOOK a eT te 


BCC 66$ ‘BR IF } 

HLT 6 ERROR, Ert SUINBOW WAS A MARK 
ISR RS, STFFCK 

] P 

MOVB =- R2, 718 ; SHIFT FOR. NEXT STUFF CHECK 
INC R3 :BUMP BIT COUNTER 

CMP #10,R3 :DO FULL . UBITS YET 

BNE 64$ : 

CLR R3 :CLEAR BIT COUNTER 

DEC RO :DEC CHARACTER COUNT 

BNE 1e$ ?BR IF NOT DONE YET 


;CHECK BCC FOR PRECEDING MESSAGE IN THE BIT WINDOW 


COM CALBCC ;ADJUST BCC FOR SOLC 
MOV CALBCC,RO ;PUT BCC 

MOV RO, 725 “LOAD BCC FOR STUFF CHECK 
DATACLK, 1 : SHIFT HARDWARE Bcc 

ROR RO SHIFT S 

BCC 693 :BR IF CARRY CLEAR 

JSR PC. GETSI LOOK AT Bt WINDOW 

BCS 70$ :BR IF OK 

HLT 14 : ERROR CRC WRONG (SPACE) 

BR 70S iC 

JSR PC, GETSI LOOK AT BIT WINDOW 

BCC 70$ ‘BR IF OK (SPACE) 

HLT 14 TERROR, CRC WRONG (MARK) 

ISR RS, STFFCK i Staaacten CHAR FOR ZERO STUFFS 
1 :SHIFT COUN 

MOV RO, 72% : SHIFT Cor BCC ONCE 

INC R3 : BUMP BIT COUNTER 

CMP #20,R3 FINISHED BCC YET? 

BNE 68$ BR IF NO 


PAGE: 
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4519 027516 005003 CLR R3 -CLEAR BIT COUNTER 
4521 :CHECK FOR FLAG TO FOLLOW BCC 
4o55 027520 012737 000176 001252 MOV 8tB<O1111110>, TEMP3 ;PUT FLAG CHARACTER IN TEMPS 
4524 027526 104415 000001 73S:  DATACLK, 1 -CLOCK FLAG ONCE 
4525 027532 106027 O0leSe RORB TEMPS ‘SHIFT SOFT FLAG 
4526 027536 103405 8CS 745 ‘BR IF BIT IS MARK 
4527 027540 004737 032012 JSR PC, GETSI ‘LOOK AT BIT WINDOW 
4528 027544 103006 Bcc 75$ :BR IF OK 
4529 027546 104026 T ‘ERROR IN FLAG CHAR 
4530 027550 O00404 BR 75$ 
4531 004737 032012 74$: JSR PC, GETSI :LOOK AT BIT WINDOW 
4532 027556 103401 acs 75¢ :BR IF OK 
4533 027560 10402 HLT 26 ERROR IN FLAG CHAR 
4534 027562 005203 75S: INC R3 tINC BIT C 
4535 027564 022703 O00010 CMP #10,R3 iF LAG DONE YET? 
4536 027570 001356 NE 73$ :BR IF NO 
4537 027572 005003 CLR R3 ‘CLEAR BIT COUNT 
4339 :CHECK FOR ANOTHER FLAG CAUSED BY THE SOM 
4541 027574 012737 000176 001252 MOV WtB<O1111110>, TEMPS ;PUT FLAG CHARACTER IN TEMPS 
4542 027602 104415 9000001 768:  DATACLK, 1 K FLAG ONCE 
4543 027606 106037 001252 RORB  ' TEMP3 ‘SHIFT SOFT FLAG 

44 027612 103405 BCS 775 ‘BR IF BIT IS MARK 

027614 004737 032012 JSR PC GETSI :LOOK AT BIT WINDOW 
4546 027620 103006 BCC 78 :BR IF OK 
4547 Oe7be2 104026 HLT 26 ‘ERROR IN FLAG CHAR 
4548 027624 OO0404 BR 78S 
4549 027626 004737 032012 773: ISR PC. GETSI ;LOOK AT BIT WINDOW 
4550 027632 103401 BCS 78 :BR IF OK 
4551 027634 104026 HLT 26 ERROR IN FLAG CHAR 
4552 027636 005203 785: INC R3 :INC BIT 
4553 027640 022703 oo0010 CMP $10,R3 FLAG bone VET? 
4554 027644 001356 BNE 76$ ‘BR IF NO 
4555 02764 905003 CLR R3 :CLEPR BITC 
4556 027650 012700 o00004 MOV ; RES BE ARACTER COUNTER 
4557 027654 012704 033614 MOV aMeCDAT. RY ; LOAD MESSAGE POINTER 
4558 027660 005037 027722 CLR 118 CLR SOFT BCC 
4559 027664 9005137 027722 COM 11$ ‘Duet TO -1 FOR SDLC 
4560 027670 112405 13$:  MOVB  (R4)+,RS5 ; LOAD CHAR IN RS 
4561 027672 010502 MOV RS Re’ ‘LOAD CHAR IN Re 
4563 sCHECK SECOND MESSAGE IN THE BIT WINDOW (0,125,252,377) 
4565 027674 010537 027770 MOV RS, 86S ;LOAD FOR STUFF CHECK 
4566 027700 012737 102010 033030 MOV aCRC CCITT, XPOLY” -LOAD POLYNOMIAL 
4567 027706 010537 027720 MOV RS, 925 LOAD SOFT CHAR FOR BCC 
4568 027712 004537 032706 JSR RS'SIMBCC CALCULATE OFT BCC 
4569 027716 OO0010 10 :SHIFT COU 
4570 027720 900000 923: O ‘STARACTER 
4571 027722 900000 11g: 9 ;OLD BCC 
13737 033032 927722 MOVs CALBCC, 1s ;LOAD SOFT BCC FOR NEXT SHIFT 


‘ 0 
4073 7732 104415 000001 798: ‘lh SHIFT DATA IN 10 BIT WINDOW 
ci 106002 ORE R2 :SHIFT SOFT Data 


COS 
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4575 027740 103005 Bcc 80S :BR IF A SPACE 
4576 027742 004737 032012 JSR PC, GETSI ‘LOOK AT BIT WINDOW 

7? 1 BC Bi iBR IF OK (MARK) 

78 ae HL !ERROR, BIT WINDOW WAS A SPACE 
4579 027752 O00404 BR 815 : CONTINUE 
580 g27754 004737 032012 gos: JSR PC GETSI :LOOK AT BIT WINDOW 
4581 027760 103001 Bcc gi$ ‘BR IF OK (SPACE) 
4582 O2 104006 HLT ‘ERROR, BIT WINDOW WAS A MARK 
4583 027764 g1$: 
4584 027764 004537 033474 ISR RS, STFFCK 
4585 027770 O00000 BS: 0 
4586 027772 000001 1 

? 027774 110237 027770 MOVB Re, 86S :SHIFT FOR NEXT STUFF CHECK 
4588 030000 005203 INC R :BUMP BIT COUNTER 

030002 03 000010 CMP #10,R3 ‘DONE FULL 8 BITS YET 

4590 030006 001351 BNE 79§ :8R IF NO 
4591 030010 3 CLR R3 ;CLEAR BIT COUNTER 
4592 030012 005300 DEC RO !OEC CHARACTER COUNT 
4533 030014 001325 BNE 13$ ‘BR IF NOT DONE YET 
4335 ;CHECK BCC FOR PRECEDING MESSAGE IN THE BIT WINDOW 
4597 030016 005137 033032 COM CALBCC ;ADJUST BCC FOR SDLC 
4598 030022 013700 033032 MOV CALSCC, RO ;PUT BCC IN 
4599 030026 010037 030070 MOV RO, 9878 ‘LOAD BCC FOR STUFF CHECK 
4600 030032 104415 000001 838:  DATACLK,1 HIFT HARDWARE BCC 
4601 030036 006000 ROR RO Pia SOFT BCC 
4602 030040 103005 BCC 84S ;BR IF CARRY CLEAR 
4603 O30042 004737 032012 JSR PC. GETS! LOOK AT BIT WINDOW 
4604 030046 103406 B¢S as¢ ‘BR IF OK (MARK) 
4680S 030050 104014 HLT 14 ;ERROR, CRC WRONG (SPACE) 
4606 030052 O00404 BR 85s TIAUE 
4607 030054 004737 032012 B4$: JSR PC GETSI TOOK AT BIT WINDOW 
4608 030060 103001 BCC ast :BR IF OK (SPACE) 
4609 030062 104014 HLT 14 ‘ERROR, CRC WRONG (MARK) 
4610 030064 gss: 
4611 030064 004537 033474 JSR RS, STFFCK sCHECK BCC CHAR FOR ZERO STUFFS 
4612 0930070 o00000 97g: 0 ; CHARA TER 
4613 030072 90900} 1 :SHIFT COUNT 
4614 030074 010037 030070 MOV RO,97$ SHIFT SOFTBCC ONCE 
4615 030190 905203 INC ‘BUMP BIT COUNTER 
4616 030102 022703 ooocec CMP #20,R3 ;FIN NISHED BCC YET? 
4617 O3010€ 001351 SNE Q3$ :BR IF NO 
418 030110 905003 CLR R3 ‘CLEAR BIT COUNTER 
#20 ;CHECK FOR FLAG TO FOLLOW BCC 
W622 030112 012737 000176 oDi2se MOV #t8<O1111110>, TEMP PUT FLAG CHARACTER IN TEMPS 
4623 030120 104415 oOC0001 983:  DATACLK, ! :CLOCK FLAG ONCE 
4624 030124 106037 001252 RORB  ' TEMP3 :SHIFT SOFT FLAG 
4625 030130 Bcs 89S ;BR IF BIT IS MA 
4626 030132 004737 O32012 JSR PC GETSI ‘LOOK AT BIT WINDOU 
4627 030136 103006 BCC 30$ F OK 
4628 030140 104026 HLT 26 :BR UF IN FLAG CHAR 
4€e9 O30142 O00404 BR 30s 
4630 930144 004737 o22012 eog: JSR PC, GETS! :LOOK AT BIT WINDOW 
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BC $ 

eH Bapte8 1Bsa3e re | oe Finda i FLAG CHAR 

a301 Se ee? 2703 0900010 ve iN So R3 ‘ANG OTONE VE ver? 
wes o52708 BNE 88s :BR IF NO 
136 030164 005003 CLR R3 :CLEAR BIT COUNT 
1538 :CHECK TO SEE IF TRANSMITTER IS MARKING 
4640 030166 104415 000001 2s: DATACLK, ! ; CLOCK ay RANSNITTER 
4641 030172 004737 032012 JSR PC, GETSI ;L00K A T WINDOW 
4642 030176 103401 cs ey} ‘IT SHOULD BE MARKING 
4643 030200 104024 HLT 24 : ERROR BIT WAS A SPACE 
4644 030202 005203 3S: INC R3 BUMP BIT COUNTER 
4645 030204 022703 000007 CMP #7,R3 Yer 
4646 030210 001366 BNE 2s iB0 IF 
4647 O30212 104415 O00010 DATACLK, 10 : GIVE ENOUGH TICKS TO CLEAR OUT ACTIVE 
4648 030216 005003 CLR R3 ‘CLEAR BIT COUNTER 
4649 030220 104415 oO0001 4s: DATACLK, 1 ‘SHIFT OUT NEXT BIT 
4650 030224 004737 032012 JSR PC, GETSI ‘LOOK AT BIT WINDOW 
4651 030230 103401 BCS 44 ;BR IF IT IS A 
4652 030232 104024 HLT 24 re TRANSIT TER IS NCT MARKING 
Sa pues GF) coon fe om per teS 

&cU, ; 

4655 030242 001366 Ce 4g Be NO 
4657 ;CHECK TO SEE THAT FIRST FOUR CHARACTER MESSAGE 
458 WAS RECEIVED CORRECTLY (0,125, 252,377 
4660 030244 104415 900001 DATACLK, i :GET LAST BIT IN RECEIVER 
4661 030250 012703 900004 MOV #4,R3 ;R3= CHARACTER 
4662 030054 Ole702 033614 MOV aMESDAT, Re LOAD MESSAGE POINTER IN R2 
4663 030260 004737 9O32652 4O$: JSR PC, INRDY GATT FOR I 
4664 030264 104414 ROMCLK ‘NEXT WORD IS INSTRUCT ION, ROMCLK PC=$304 
4665 030266 021204 021204 
4666 030270 016104 cog004 MOV 4(R1),R4 :PUT “FOUNC” IN RY 
4667 030274 112205 MOVB = (R2)+_ RS :PUT “EXPECTED” IN RS 
4668 030276 120504 CMPB = seRS_ RY 1S RECEIVED DATA CORRECT? 
4669 030300 001401 BEQ 41$ :B YES 
4670 030302 104010 LT 10 ‘RECEIVE DATA ERROR 
4671 030304 005302 41$: DEC R3 :DEC CHARACTER COUNT 
4672 030306 001364 BNE 40S ‘BR IF NOT DONE YET 
4674 ;CHECK TO SEE THAT IN BCC MATCH IS SET 
4675 !AND THAT THE BCC WAS RECEIVED CORRECTLY 
4677 030310 004737 032652 JSR PC, INRDY ;WAIT FOR INRDY 
4678 030314 AOu4i4 ROMCLK eri Is INSTRUCTION, ROMCLK PC=S304 
4680 B35358 116137 o00004 o01252 vat 4(R1). TEMP3 ;PUT IN TEMPS 
4681 030326 042737 177400 O01252 BIC #177400, TEMP3 ‘LEAR HI BYTE 
4682 030334 004737 032652 ISR PC, INRDY WAIT FOR INRDY | 
4683 630340 104414 ROMCLK "NEXT WORD IS INSTRUCTION, ROMCLK PC=5204 
4684 030342 Oe1c44 021244 
4665 030344 O16104 ooDco4 MOV 4iR1),R4 :PUT “FOUND” IN RY 


4686 030250 042704 000374 BIC #374, R4 :CLEAR UNWANTED BITS 
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Noor 
oOOr-— 
rom 
J 
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000003 


000004 
000377 
001250 
033032 
000904 


033614 
03265e 


000904 


032652 


000004 
177400 
032652 


000003 
000004 
000377 


001250 
033032 


001251 


0012Se 


001252 
001eSe 


001251 
001250 
001252 
001252 
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Sos: 


42$: 
43$: 


44§ : 


wn 
-— 
ws 


PAGE: 

MOV #3,R5 iPu “EXPECTED” IN RS 

CNP RSF ARE IN BCC MATCH AND BLOCK END SET” 

HLT 42 ;IN BCC MATCH ERROR 

ROMCLK ;NEXT WORD wis, INSTRUCTION, ROMCLK PC=S304 
021204 GET LAST HAL 

MOVE = 4(RL),TENP2+1 =; PUTIN Tene. 

BIC #377, tEMP2 ;CLEAR LO BYTE 

BIS TEMPS TEMP 16 BIT” BCC _NOW IN TEMPS 

CMP cALBct, TEMP3 ite I CORR ECT? 

BEQ 42§ ‘BR IF 

HLT 27 

:CHECK TO SEE THAT SECOND FOUR CHARACTER MESSAGE 

:WAS RECEIVED CORRECTLY (0,125,252, 377 

MOV ;R=CHARACTER COUNT 

MOV ant SoAT, R2 LOAD MESSAGE POINTER IN R2 

JSR PC, INRDY mart FOR INRDY 

RONCL ‘NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
MOV 4(R1),R4 T “FOUND” IN 

MOVB = (R2)+°RS BUT “EXPECTED” ay RS 

CMPB ss RS, RY IS RECEIVED DATA CORRECT? 
BEQ 44g :BR IF YES 
HLT 10 ‘RECEIVE DATA ERROR 
DEC R3 DEC CHARACTER COUNT 
BNE 43$ !BR IF NOT DONE YET 

:CHECK TO SEE THAT IN BCC MATCH IS SET 

“AND THAT THE BCC WAS RECEIVED CORRECTLY 
JSR PC, INRDY s WAIT FOR INRDY 
ROMCLK sNEXT trot 1S INSTRUCTION, ROMCLK PC=S304 
021204 T FIRST 
MOVS 4(R1), TEMP3 ;PUT 
BIC #177400, TEMP3 tet ARY HI OTE 
ISR PC, INRDY *WAIT FOR INRDY 
RONCLK “NEXT WORD IS INSTRUCTION, ROMCLK ®C=5304 
MOV 4(R1),R4 ;PUT “FOUND” IN R 
BIC #374, RY CLEAR UNWANTED SITs 
MOV #3,R5 ;PUT “EXPECTED” IN RS 
NPE ia” ‘ARE IN BCC MATCH AND BLOCK ENC SET" 
HLT ;IN BCC MATCH ERROR 
ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=53C4 
021204 GET LAST HALF 
MOVE 4C(RL),TEMP2+1  :PUT IN TEMPe 
BIC #377, TEMP2 ‘CLEAR LO BYTE 
BIS TEMP, TEMP3 16 BIT BCC NOW IN TEMP3 
CMP cALBC’,TEMP2 ;IS IT CORRECT? 
Beg os -BR IF OK 
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473 030604 104400 S$: SCOPE :SCOPE THIS TEST 

4? 

4746 ; RERRRERRRARERARE RARER REREELE TEST S7 Skee ee eee eee EERE EEE EEE ES 

474? !#EMPTY SILO TEST 

4748 :#LOAD SILO WITH 2. SYNCS 44 CHAR MESSAGE, SINGLE CLOCK 

4745 :#UNTIL THE Sig 1 ENETY 4 MORE CHARACTERS IN THE 

4750 :#SILO. GIVE M e/} bn Ve VERIF Y THAT ONLY THE FIRST 

475) :#4 CHARACTERS BNO A a Bloc ENO WERE RECEIVED, AND IN ACTIVE IS cLEaR 

i925 ppd MRA Me Be Bd Bd 

475 

4754 : TEST S7 

, Bak eee eee ee eee eee 

4756 030606 012737 cOOOST 001226 TSTS7: MOV #57. TSTNO 

4757 030614 912737 031026 d012i6 MOV sioteg. NEXT 

4758 :R1 CONTAINS BASE DMC11 ADDRESS 

4759 030622 104412 MSTCLR :MASTER CLEAR DMC11 

4760 030624 O0S06! oo0004 CLR 4(R1) ‘CLEAR PORTY 

4761 030630 104414 ROMCLK “NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 

47 1ee11? 122117 ‘PUT LU IN BITST 

476 033374 JSR PC, CLRIO :DO THIS AFTER MODE Ts SET 

4764 030640 012711 OO4000 MOV e8{tT11. (RL) :SET LINE UNIT LOOP 

4765 O30644 012702 033614 MOV eMESDAT, Re :Re POINTS TO MESSAGE 

4766 030650 012700 900003 MOV #3, ‘RO = CHAR COUNT 

4767 030654 004737 033176 JSR PC’SYNLD "LOAD SILO WITH TWO FLAGS 

4768 030660 004737 032176 JSR PC’ OUTRDY WAIT FOR OUTRDY 

4769 030664 004537 033332 JSR RS MESLD :LOAD MESSAGE IN SILO 

4770 030670 033614 MESDAT :START OF MESSAGE 

4771 030672 O00004 4 ; CHARACTER COUNT 

4772 030674 004737 032044 JSR PC,OCOR :WAIT FOR OCOR 

4773 030700 104415 O0006S DATACLK, &S “CLOCK DATA (EMPTY SILO) 

4774 030704 004S37 033332 JSR ‘RS,MESLD :PUT MORE CHARACTERS IN SILC 

4775 030710 033614 MESDAT 

4776 712 4 

4777 030714 004737 oO32044 ISR PC,OCOR 

4778 030720 104415 O00006 DATACLK, 6 ;CLOCK UNTIL RTS IS CLEARED — 

4779 030724 104414 ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLk 2¢=S3C4 

4780 030726 021264 021264 T RTS 

4781 030730 032761 og0040 ooco04 BIT SBITS,4(R1) iTS IT CLEAR? 

4782 030736 001401 BEG o$ :BR IF YES 

4783 030740 104034 HLT 34 ‘ERROR, RTS NOT CLEAR 

4784 030742 1044iS o00041 S$: DATACLK, 4] :CLOCK XMITTER SOME NORE 

4785 030746 004737 032652 1$ JSR PC, INRDY 0K LETS CHECK WHAT WAS RECEIVED = _ 

478? OSn7eN bereod Aoi 204 Pay fee ~ 

4788 030756 O16104 ooo0o4 MOV 4(RL) RY ne CET 

4789 030762 112295 MOVB = (R2) +. RS RSs “EXPECTED” 

4790 030764 120504 CMPB eR. RY ‘TS DATA CORRECT? 

4791 001401 BEQ 

4792 030770 104010 HLT 10 :DATA ERROR 

4793 030772 005300 23: DEC RO :DEC CHAR COUNT 

4794 030774 001364 BN :BR IF NOT DONE YET 

4795 030776 004737 922652 JSR PC, INRDY WAIT F DY 

4796 931002 104414 ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 

47987 031004 Oe1244 de1e44 =READ L 


U-le 
4798 031006 O16104 ccooo4 MCV WORLD, RY : PUT “POUNE™ IN RY 
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4799 031012 o12705 000022 MOV #22,R5 :PUT “EXPECTED” IN RS 

4800 031016 120504 CMPB = seaRS RY ‘ARE BLOCK END AND IN RDY SET? 

4301 : AND IN ACTIVE AND IN Bee MATCH CLEAR? 

4802 031020 001401 BEQ b$ ‘BR IF YES 

4803 031022 104032 HLT 32 ‘ERROR, BLOCK END NOT SET 

4804 :OR IN’BCC MATCH NOT CLEAR 

4805 :OR IN ACTIVE NOT CLEAR 

4806 031924 6$: 

4807 031024 104400 SCOPE :SCOPE THIS TEST 

1858 

4615 i SBITSTUFF CABLE DATA TEST TEST 60 RKEAARAASRAAARALLSESERLALRLLELES 

4811 : #BITSTUFF CABLE DATA TEST 

4912 -*THIS TEST LOADS Ni SILO WITH THE FOLLOWING: 

4813 #2 FLAGS. 16 CHAR,EOM, 16 CHAR,EOM. 16 CHAR, £0 

4814 : #THE 16 CHARACTERS INCLUDE A’ FLOATING ONE AND ZERO 

4815 :*#THE DATA IS TRANSMITTED OVER THE CABLE USING THE INTERNAL CLOCK 

4816 ;*RECEIVED DATA IS VERIFIED AS IS IN BCC_MATCH 

4817 a0 -BACK CONNECTOR MUST BE ON TO RUN THIS TEST 

ugig 5 EHEHRALRAARAE RAR LARS L SARA AREA RA SAAS LALA RAE EA SLES ESE 444444444 

ige ; TEST 60 

v4 ot. ll ll) 

4822 931026 012737 oOO00bO 901226 TST60: MOV #60, TSTNO 

4823 031034 012737 031450 O01216 MOV aTSté1, NEXT i: 

4824 ;R1_ CONTAINS BASE ONC ADDRESS 

4825 oO31042 104412 MSTCLR MASTER CLEAR DMC 

4826 631044 032737 O40000 001366 BIT 8BIT14, STAT! Ske TEST IF NO 

4827 031052 001575 BEQ 3$ ‘LOOP BACK CONNECTOR ON 

4828 031054 905061 oso0004 CLR 4(RL) :CLEAR PORTY 

4829 031060 104414 ROMCLK :NEXT WORD IS INSTRUCTION ROMCLK PC=S304 

4830 021062 122117 122117 ‘PUT LINE UNIT IN BITSTUFF MODE 

4831 031064 004737 033374 JSR PC. CLRIO :DO THIS AFTER MODE IS SET 

4832 031970 012711 oO4000 MOV eet: (RL) ; SET LINE UNIT LOOP 

4833 031074 004737 033176 ISR PC. SYNLD TWO FL AGS 

4834 031100 012737 102010 033030 MOY ache CCITT, XPOLY: ‘OAD POLYNOMIAL FOR SOFT CRO CAaLc 

4835 031106 005037 9031142 CLR 6$ :CLEAR OLD 

4836 O3l112 005137 931142 COM eS ‘ADJUST TO -1 FOR SOLC 

4837 031116 012703 000020 MOV CHARACTER COUNT 

4838 031122 012702 033620 MOV tec ibaT R2 ;Re= POINTER e 

4839 031126 112237 0311490 73: MOVE = (R2)+, S$ "LOAD CHAR FOR SOFT BCC CALC. 

4840 031132 004537 032706 JSR RS, SIMBCC :CALC SOFT BCC 

4841 031136 000010 1 iH HIF T COUNT 

4842 031140 000000 ct: 0 HARACTER 

4843 021142 o00000 6S: 9 toe a 

4844 031144 013737 033032 021142 MOV CALBCC,6$ :CORD “OL Be 

4845 031152 005303 DEC R3 ‘DEC COUNT 

4846 931154 001364 ONE : BR IF NOT DONE YET 

4847 031156 005137 033032 COM CALBCC ; ADJUST CALBCS FOR SDLC 

4848 O31162 004537 033322 JSR RS MESLD LOAD SILO 

4849 031166 033620 FLTDAT MESSAGE ADDRESS 

4859 031170 000020 16. : CHARACTER COUNT 

4851 031172 004737 033306 JSR PC ,.EOM :LOAD AN EOM 

4852 031176 004737 033306 JSR PC.EOM 

4253 031202 004637 033332 ISR RS‘ MESLOD sLOAD SILO 

4864 031206 033620 FLTDAT :MESSAGE ACDRESS 


CLOMF = MACY11 30( 1046) 


OZOME.P11 12-MAY-77 14:1 


4855 

4 

485; 
8se 


L1-JUL-77 
8 


Fy ie 


OSL 44€ 


001401 
104025 


005303 


091364 
012703 


104400 


033306 
32888 
032652 


oocco4 


oo0020 


032652 


oo0004 
177400 
032652 


900004 
000374 
000003 


000004 
033032 


033620 


poi geh 


Boi BES 
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HOS 


BASIC RECEIVER TESTS 


1$: 


4§; 


PAGE: 


ed 


eT AR is Pe 

JSR RE'MESLD ;LOAD SILO 
(te 

ya BE §R5e ;WAIT FOR OCOR 

a a et 
RY baal as Spel POINTER IN R2 
aon K eee shalt FOR INsrg CTION, ROMCLK C=5304 
STs A oe REE 
Hove trays tRe Pu SEnPECT BBs tN R Eouno 
CMPBsoRS RY CEIVED DATA CORRECT 
BEG FF OK 

HLT 25 ‘DATA ERROR 

DEC R3 ;DEC CHARACTER COUNT —_— 

NE F NOT DONE THIS MESSAGE 


B 1$ RI 
MOV #16. ,R3 ‘RESET CHARACTER COUNT 


;CHECK TO SEE THAT IN BCC MATCH IS SET 
;AND THAT THE BCC WAS RECEIVED CORRECTLY 


PLSSJIUt 


JSR PC, INRDY :WAIT FOR INRDY 
ROMCLK ‘NEXT WORD IS INSTRUCTION, SOMCLk PC=5304 
021204 GET FIRST HALF OF CRC 

MOVE  4(RL), TEMP3 :PUT IN TEMPS 

BIC #177400, TEMP3 ; CLEAR HI BYTE 

JSR PC, INRDY WAIT FOR INRDY : 
ROMCLK =NEXT WORD IS INSTRUCTION, ROMCLK PC=5205 
021244 

MOV 4Y(R1) R4 ;PUT “FOUND” IN RY 

BIC #374. R4 ‘CLEAR UNWANTED BIT : 

MOV #3.RS ‘PUT “EXPECTED” IN RS 

CMPB Ss RS-_ RY :ARE IN BCC MATCH AND BLOCK END SET? 

BEG 25$ 

HLT 42 :IN BCC MATCH ERROR 

ROMCLK ;NEXT WORD ws, INSTRUCTION, ROMCLE 

d212e04 :GET LAST 

MOVE 4(R1),TEMP2+1 PUT IN TEMPS 

BIC 8377, TEMP2 : CLERR LO BYTE 

BIS TEMP? TEMP3 & BIT BCC NOW IN TEMP3 

CMP CALBCC, TEMP3 ite IT CORRECT? 

BEG 4§ :BR IF OK 

HLT 2? 

MOY #FLTDAT,R2 te NES SAGE POINTER 

DEC RO cRenent COUNT 

BNE 1$ BR 

SCOPE TOPE THIS O eee 


ttt 
weee 


DZOME.PLL 
4911 
4912 
4913 
4934 
4gis 
4916 
4917 
4918 
4915 
492 
4921 
4922 
4923 
4924 031450 
4925 O31456 
4926 
4927 031464 
4928 031466 
4929 031474 
4930 031476 
493i 031502 
4932 031504 
4933 031506 
4934 031512 
4935 031516 
4936 031522 
4937 031530 
4938 631534 
4939 031540 
4940 031544 
494i 031550 
4942 031554 
4943 031560 
4944 031562 
4945 031564 
4946 031566 
4947 031574 
4948 031576 
4949 031600 
4950 031604 
4951 931610 
4952 031612 
4953 O31614 
4954 031620 
4955 031604 
4956 031630 
4957 031632 
4958 031636 
4969 031642 
4960 031646 
4961 031650 
4962 031652 
4963 031656 
4964 O31660 
4965 031662 
4966 O31E64 


OIDMF =MACYI1 30: 1046) 
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012737 
012737 


104412 


L1-JUL-?7 


000061 
003364 


o40000 
ooo004 


033374 


032706 


033032 


033032 
033332 


033306 
033306 
032044 


009073 


033614 
032652 


000004 


001366 


033039 


031564 
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BASIC RECEIVER TESTS 


TST]: 


S$: 
6$: 


18: 


109 


PAGE: 


; Ravenessoesoceeensegeerer TEST Gl SHRHRSREAELESEESES ESSE SESE 


HE DATA 
i SREEEIVED 
; LOOP BACK CONNECTOR MUST B 


FF CABLE DATA 


EST LOADS SOUT S Po WITH THE FOLLOWING: 
Wags S39 DATA CHARACTERS Ae WITH GARBAGE CHARACTER 


ATA IS V 


S TRANSMITTED OVER THE CABLE Us the THE INTERNAL CLOCK 
VERI a = IS_IN BCC MA 


E— ON TO RUN THIS” TEST 


s RERSRERAAARARA LARA LALA LA LAA AAA AALE LAL AAAAALALALA LALA LFA ESLLL ES 


; TEST 61 

hov #61, TSTNO 
MOV #. EOP, NEXT 
MSTCLR 

SIT eBIT14,STATL 
BEG 

CLR 4(RI) 
ROMCLK 

122117 

JSR PC, CLRIO 
MOV eet (RL) 
JSR 

MOV 

CLR 

COM 

MOV RB 
MOV BMESDAT,R2 
MOVB (Ro+, S$ 
JSR RS, SIMBCC 
10 

: 

MOV CALBCC,6$ 
DEC R3 

BNE 73 

COM CALBCC 

ISR RS, MESLD 
MESDAT 

SS. 

JSR PC,EOM 

JSR PC EOM 

JSR PC’ OCOR 
CLR (RL) 

MOV S59. RO 
MOV #MESDAT, Re 
JSR , INRDY 
ROMCLK 

021204 

OV 4(R1) RY 
MOVB = (R2)4+_RS 
CMPB ss RS. R4 

BEG 23 

HLT 25 


;R1 CONTAINS BASE DMC1i ADDRESS 
iM “a; MC11 


PUT LINE UNIT IN BITSTUF 
iO THIS AFTER Hon IS cer 
;SET Lis UNIT LOOP 


NLD “LOAD TWO FLAGS 
Hohe. .CCITT,XPOLY;LOAD POLYNOMIAL FOR SOFT CRC CALC 


;CLEAR OLD BCC 

tADJUST TO -i FOR SDLC 

; CHARACTER COUN 

;R2= POINTER no 

‘TOAo CHAR FOR SOFT BCC CALC. 
C SOFT BCC 


;BR IF NOT DONE YET _ 

SADJUST CALBCC FOR SCLC 
OAD SILO 

MESSAGE ADDRESS 

:CHARACTER COUNT 

:COAD AN EOM 


;WAIT FOR are 

:CLEAR LINE UNIT Lo - 
;RO= CHARACTER COUN 

LOAD MESSAGE POINTER IN Re 
shat FOR INRDY 

;NEXT WORD IS a AS id a ROMCLK PC=S304 


E 
18 Pee DATA CORRECT 
{DATA ERROR 


Hits 
weee 


JO9 


ZDME jnacvad 30(1046) 11-JUL-77 11:59 PAGE 93 PAGE: 01123 
DZDME. P 12-MAY-77 14:18 BASIC RECEIVER TESTS 

4967 es: 

neg Bat ERE 005300 DEC RO :DECREMENT COUNTER 

4369 031670 001364 BNE 1$ :BR IF NOT DONE 

ra 

497} CHECK T HAT H 

4376 + ANB Kad 133 CC WAS YER Eb cORREET Ly 

4374 031672 004737 032652 ISR é PC, INRDY MALT FOR INROY cxvasvie: tenn scien 

4252 BS1858 AIBA AST Sh4 ia FIRGY pALP OF at 

4977 031702 116137 O00004 o01252 MOVB  4(R1), TEMP3 

cs Gate Gere aieeae SS Ns ta 

4980 031722 104414 RONCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 

ae B31 55e area 900004 ~ 4(RL) RY ;PUT “FOUND” IN RY 

4983 031732 042704 000374 BIC #374. RY “CLEAR UNWANTED BITS 

4984 031736 012705 000003 MOV #3,R :PUT “EXPECTED” IN RS 

4985 031742 120504 CMPB RSS| R4 ‘ARE IN BCC MATCH AND BLOCK END SET? 

4986 031744 901401 BEQ 25$ 

4987 031746 104042 HLT 42 IN BCC MATCH ERROR 

4988 031750 258: 

4989 031750 104414 ROMCLK s NEXT WORD Is_ INSTRUCTION, ROMCLK PC=S304 

4930 031752 021204 021204 GET LAST 

4991 031754 116137 OO00004 001251 MOVB 4(R1),TEMP2+1 PUT IN TenPS 

4992 031762 042737 000377 001250 BIC #377, tenre ‘CLEAR LO BYTE 

4993 031770 053737 001250 O0leSe BIS MP2 TEMP3 ;16 BIT BCC NOW IN TEMPS 

4994 031776 023737 033032 OOleSe CMP tect. TEMPS; 1S IT CORRECT? 

4995 932004 001401 BEQ 33 :BR IF OK 

dgqe Ba5ci8 tpugsa 26; chore | “SCOPE THIS TEST 

499g 00300 

4999 00400 

at ce ; SUBROUTINES 

5003 032012 00800 eee, 

5004 00900 sTHIS SUBROUTINE READS LU 17, AND PUTS IT INTO NITCH. 

2006 91000 "NITCH IS ROTATED LEFT UNTILL THE SI BIT IS IN CARRY 

5007 032012 104414 ROMCLK sNEXT WORD IS INSTRUCTION, ROMCLK PC=S204 

£908 032014 021364 91300 021364 iP RT4+LU 17 

£009 030016 017737 147370 o3204e 6140 MOV JOMPOY.NITCH STORE LU I? 

5010 O32 106137 O32042 1500 ROLB -NITCH 

5011 032030 106137 O3204e2 91600 ROLB  NITCH 

5012 032034 106137 o32042 01700 ROLB -NITCH PUT SI IN THE CARRY BIT 

£013 032040 000207 oig0o RTS PC 

5014 o3e04e 00000 01900 NITCH: O 

5015 92000 

Ente 032044 B5355 OCOR 

218 92300 "THIS SUBROUTINE SPINS ON OCOR 

5020 032044 104414 ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=25304 

5021 03204 021264 02600 021364 PORTY 

Ese o320s0 032777 cooo20 147234 02700 BIT 88174, JDMPOY ts bor” set? 


OZDMF MACY11 30( 1046) 
DZONE .P11 


es 
S0es 
a 
$029 


032062 


Seng 


RRRRRR RRR 
NFS LVOVSROL 
= 


032146 


RRRE 


009207 


005037 


104414 
021224 
777 


000207 


032230 


032230 
032234 
032240 


013637 
062746 
012737 


11-JUL-77 
12-MAY-77 14:18 


OC 1246 
000002 
000026 


032176 
000001 


000026 
001246 
032176 
o00004 
000301 


032044 


901256 


000020 
001256 


001250 
000002 
000003 
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SUBROUTINES 


000004 


000004 


ooco04 


000004 


147176 


0820) 
001246 08300 


1$: 


OUTROY: 


1$: 


2s: 


CHAR : 


PAGE: 


Reg BRO 


BE BER rs ser, co Back 


; THIS SUBROUNTINE LOADS THE SILO WITH THE NUMBER OF SYNC 
;CHARACTERS PASSED TO IT IN THE WORD AFTER THE JSR CALL 
AND A NON-SYNC CHARACTER (301) 


a(SP)+, TEMP1 ;GET COUNT 
2. -(SP) ; ADJUST STACK 
MOV #26, 4(R1) :LOAD PORTY 


2D 
oO 
Oo 
a 


ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
122114 ‘LOAD SYNC REGISTER 
JSR PC, OUTRDY GAIT ou TROY 
MOV #1 24°R1) ? LOAD PORT 
ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=5204 
122111 :SET on 
OV 826,4(R1) ; LOAD POR 
ROMCLK NEXT WORD 1S INSTRUCTION, ROMCLK PC=5304 
122110 :LOAD OUT DAT 
DEC TEMP1 ;ALL DONE? 
sR Pn 
S OUTRDY WAIT FOR OUTROY 
CLR 4(RI1) :LOAD PORTY 
ROMCLK {NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
122111 SET SOM 
OV #301,4(R1) LOAD PORTY 
ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
122110 LOAD OUT DA 
JSR PC,OCOR WAIT FOR BCR 
RTS PC 


; THIS SUBROUTINE SPINS ON OUT READY 


CLR TEMPS ;CLEAR TIMER 

ROMCLK 3 NEXT “ati IS INSTRUCTION, ROMCLK FC=S304 
O2lee4 ;PORT4Ye*LUL1 

BIT #BIT4, JDMPOY :IS QUT ROY SET” 

BNE 2s i A * Mt 

BNE ie P TOHE KIN F NOT 

HY = ibe UT REABY NOT SET 

RTS PC 


; THIS SUBROUTINE LOADS THE SILO WITH 3 SYNCS 
SAND THE CHARACTER PASSED TO IT. 


MOV a(SP)+ TEMP2 —_;GET CHARACTER 
ADD 7 (SP) ADJUST STACK 
MOY A TEMP! -SET FOR 3 SYNCS 


0114 


DZDMF MACY11 “no i 


DZOME.P11 12-MAY 


5079 
5080 


S083 


36 
S097 


uw! 
-_ 


ss he es 0 Oe es be be he be 


CUTOUT OUT OC UT OT U0 OT OT UO OT OO On OT OTTO O91 OT UO OT OF Un t 8 
Want iteteW st tate Inet Melt IRN aN bst aa tal itet ait 


032246 
032254 


032500 


012761 
104414 


012737 


122110 


ll-JUL-77 11:59 PAGE 95S 
4:18 SUBROUTINES 
000926 000004 08400 
032176 Bee00 1s: 
000001 o00004 08800 
2008 
ooode&6 oo0004 O91 
09300 
001246 09400 
09500 
032176 : 09600 
001eS0 ooc004 09700 
09900 
032044 10000 
10100 
19200 
10300 
10400 $$ CHARSD: 
10500 
10600 
001250 10700 
000002 10800 
032176 10900 
001e50 oo0004 11000 
11200 
032176 11300 
11500 
032044 11600 
11700 
11800 
11900 
12000 SILOLD: 
12100 
12200 
12300 
000073 001250 12400 
032646 12500 
12600 
12700 
oooode 001250 i280d 
000003 O012e4%6 12900 
000026 00004 13000 
13200 
032176 13300 61: 
000001 ooo004 13400 
13600 
ooodeé o9cco4 13700 
13900 


LOS 


MOV #26,4(R1) 


yep" PC, OUTRDY 
MOV 1‘ 4R1) 


Lee 

MOV #26, 4(R1) 
ROMCLK 

122110 

DEC TEMP 1 

BNE 1$ 

JSR PC, OUTRDY 
MOV TEMP2, 4(R1) 
ROMCLK 

122110 

JSR PC,OCOR 
RTS PC 


PAGE: O115 
io PORTY 
NEXT WORD ‘3 Rare, ROMCLK PC=5304 
i POR 
ty 


Tro | IS INSTRUCTION, ROMCLK PC=S304 


3; SE 
; LOAD PORTY 
Cond XT vied UryoaTa INSTRUCTION, ROMCLK PC=S304 


oe FM FOR Toutroy 
PORT4Y 


; LOAD 


NEKO BORO Ata INSTRUCTION, ROMCLK PC=5304 
WAIT FOR OCOR 


; THIS SUBROUTINE LOADS THE SILO WITH THE CHARACTER PASSED TO IT. 


MOV a(SP)+, TEMP2 
ADD #2,-(SP) 

JSR PC * OUTROY 
TEMP2,4(R1) 


PC, OUTRDY 


JSR PC,OCOR 
PC 


;GET Crane ie 
:ADJUST STACK 
;WAIT FOR OUTRDY 


;LOAD PORTY 
NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
QUT DAT ay 


sL 
;WAIT FOR OUT 
;NEXT WORD iS” INSTRUCTION, ROMCLK PC=S304 
LOAD GARBAGE C 
:WAIT FOR SCOR 


ait) SUBROUTINE FILLS THE OUT SILO 
WITH A BINARY COUNT PATTERN 


MOV #73, TEMP2 
TST SCHAR 


MOV #3, TEMP! 
#26, 4(R1) 


fegiis 
S FC, OUTRDY 
#1; 4(R1) 


M #26,4(R1) 
ROMCLK 


;LOAD_COUNT 
FIRST TIME HERE? 
iBR IF BITSTUFF 


;BR IF NO 

;ADD 2 TO CHARACTER COUNT 

SET FOR 3 SYNCS 

:LOAD PORTY 

NEXT WORD iS ister ROMCLK PC=5304 


ve wy 
ia Fok 
NeXT IS INSTRUCTION, ROMCLK PC=5304 
{LOAD PORT 


:NEXT WORD + INSTRUCTION, ROMCLK PC=5304 
LORD OUT DAT 


DZ0MF  MACYI1 30(1046) L1-JUL-77 11:59 PAGE 96 
DZDME.P11 12-NAY-77 14:18 SUBROUTINES 
7 001246 4 
cle Gere Bre ve 
1 1 032176 14200 2S: 
5138 032514 013761 032646 000004 14300 
5139 3252 104414 
5140 122110 14500 
5141 005737 032650 14600 
lve 1407 14700 
14 13737 032646 03254 14800 
S1¥4 032642 004537 033414 14300 
Rive 63880 GOODL 18100 
5147 032552 005237 032646 15200 6S: 
S148 032556 022737 OO0400 O3264%5 15300 
5149 032564 901403 15400 
5150 032566 005337 001250 15500 
2151 032572 001346 15600 
5152 032574 004737 032044 15700 3S: 
5153 032600 07 15800 
5154 032602 37 032646 15900 4s: 
5155 03e606 012737 177777 032650 16000 
5156 030614 7 033612 16100 
5157 0 062737 OQ00002 001250 16200 
5158 012761 000001 000004 16300 
5159 032634 109414 
5160 122111 16500 
5161 032640 104414 
i162 O3eb42 122110 16700 
5163 032644 000721 16800 
S164 032646 00000 16900  SCHAR: 
5165 032650 000000 17000 © STUFLG: 
5166 17100 
5167 17200 
5168 032652 17300 —_‘INRDY: 
5169 17400 
5170 17500 
5171 17600 
5172 17700 
5173 17800 
5174 17900 
5175 18000 
5176 032652 012737 O00000 ool2% 18100 
5177 032660 18200 18: 
5178 032660 104414 
5179 O32b62 02124 8400 
5180 032664 032777 000020 146520 18500 
5181 032672 001004 18600 
5182 032674 005237 01246 18700 
5183 032700 001367 8800 
5184 032702 104037 18900 
185 032704 000207 19000 2: 
5186 19100 
c1e7 19200 
188 03270 SIMBCC: 
5189 
£190 


MOS 


TEMP 1 

PC ,OUTRDY 
SCHAR, 4(Rib 
STUFLG 


SCHAR, S$ 
RS, STFFCL 


SCHAR 
3700 , SCHAR 


#1, *4(RL) 


2s 


PAGE: 


L 00 


:WAIT FOR lena 
iL OAD PORTY 

;NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
tL OUT DATA 


: BITSTUFF??? 


BR IF NO 
:1T IS SOLD SO CHECK BITSTUFFING 
ADD ANY BIT STUFF CLOCK TICKS 
: CHARACTER 
:CHIFT COUNT 
;NEXT CHARACTER 
LL DONE? 


Decree COUNT 
are en DONE 
‘HAT FOR "OCR 
; START PATTERN AT ZERO 
F FLAG 
COUNT 
;AD TO CHARACTER COUNT 
;SET BITO IN TY 
pe fw IS INSTRUCTION, ROMCLK PC=5304 
:NEXT WORD IS Base om, ROMCLK PC=S304 


"LOAD GARBAGE C 
;GO LOAD SILO 


iTS SUBROUTINE SPINS ON _INRDY 


F_INR 


DY FAILS TO SET 


THE DELAY TIMES OUT AND AN 


ERROR IS REPORTED. FOR BETTER SCOPE LOOPS THIS 
BE MADE SHOR 


;DELAY CAN E 
INITIALLY LOADED INTO 
;THE SHORTER THE DELAY. 


MOV 


ROMCLK 
021244 


80, TEMPL 


#BITY, JOMPOY 


12m r ALTERING THE N 
TEMP1, THE SMALL 
Q TS THE LONGEST DELAY. 


;SET UP DELAY COUNTER 


UMBER 
ER THE NUMBER 


;NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
:PORTYeLUL2 
:1S INRDY SET? 

‘BR IF YES 

INC DELAY 

: TRY AGAIN 

!ERROR,NO INRDY 

: RETURN 


‘IN SUBROUTINE CALCULATES THE CRC USING POLYNOMIAL Ye 


XPOLY. 


- ° eee ee oes |e 


THE CORRECT CRC IS RETURNED IN CALBCC, AND T 


Olle 


DZ0MF MACY11 30( 1046) 


DZOME.P11 12-MAY-77 14:18 


uw 
are 


www ut 
—— 


5206 


ENN n nnn 
RRM 


033034 


033134 


00 
120001 
102016 


004 
013761 
104414 


11-JUL-77 


Bb18s6 
033032 
033032 


033032 
001250 


000001 
033032 


001246 
001246 


032176 
000001 


000026 
001246 


032176 
001250 


NOS 


PAGE: 


;STATE OF THE LSB OF THE BCC IS RETURNED IN THE C BIT. 


;SAVE RO ON STACK 


HYPE = SLeac6PH 
;CALBCC = OLD BCC 
;PUT OLD BCC IN RO 


;SHIFT OLD BCC 
; SHIFT CHARACTER 
HAR C TO OLD BCC 


ARRY 
PUT BITO TO CARRY BIT 
CARRY IS FEEDBACK BIT 


id ERIC Y on OR XPOLY TO CALBCC 


;DEC SHIFT COUNT 

:BR NOT DO 

;GET SET TO INVERT BITO 
TR IN on 


ESULT 
SHIFT BITO TOC 
INVERT CARRY 16 erro OF TEMPi 
;PUT_ INVERTED BIT IN CARRY 
; RESTORE RO 


pHs SUBROUTINE LOADS THE OUT SILO WITH 2 SYNCS 
;WITH SOM SET, AND ONE CHARACTER PASSED TO IT 
WITH THE SOM BIT CLEAR (ENABLE CRC) 


11:59 PAGE 97 
SUBROUTINES 
MOV RO, -(SP) 
MOV (Ratt MP 
MOV (R5)+’ TEMP 
MOV (RS)+’ CALBCC 
1S: MOV catect, RO 
CLC 
ROR CALBCC 
ROR TEMPe 
ADC RO 
ROR RO 
BCC 2s 
MOV xP he R 
BIC CALBC 
033032 BIC XPOLY, “bacace 
2$: Bie Ro, CAL BC 
BNE 
001246 MOV #1, TEMPL 
MOV CALBCC,RO 
ROR RO 
ADC TEMP1 
ROR TEMP 1 
MOV (SP)+,RO 
RTS RS 
XPOLY: QO 
CALBCC: O 
LRC8=200 
CRC16=120001 
ERC. CCITT=102010 
19800  BCCLD: 
19900 
20000 
20100 
20200 
20300 MOV a(SP)+. TEMP2 
20400 ADD #2,-(SP) 
001246 20500 MOV #2! TERP! 
000004 26600 MOV #26, 4(R1) 
ROMCLK 
20800 122114 
20900 «1S: JSR PC, OUTRDY 
oo0004 21000 MOV #1 24CR1) 
ROMCLK 
21200 122111 
ooceo4 21300 OV #26,4(R1) 
ROMCLK 
21500 122110 
21600 DEC TEMP] 
21700 ONE 1$ 
21800 JSR PC, OUTRDY 
oo0004 21300 MOV TEMP2,4(R1) 
ROMCLK 


‘aby CHARACTER 


D PORT 
NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
:LOAD SYNC REGISTER 

;WAIT FOR QUTROY 


PORTY 
:NEXT on IS INSTRUCTION, 


‘oa P PORT 
NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
:LOAD OUT DATA 


: NOT 
;WAIT FOR OUTRDY 


ROMCLK PC=S304 


:LOAD PORT4 


;NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 


0117 


ee 


QZDNE _ MACYL1 30(1046), 11-JUL-77 11:89 PAGE 38 PAGE: C118 
SOME.P11 © 12-MAY-77 14:18 SUBROUTINES 
S247 03313 122110 22100 122110 QUT DATA 
8 033140 004737 032044 22200 JSR PC, OCOR ATT FOR OCOR 
5249 033144 000207 22300 RTS PC 
5250 22400 
5251 22500 
5252 033146 GETQO: 
5253 :THIS SUBROUTINE READS THE STATE OF THE TRANSMIT 
eS !BCC LSB AND PUTS IT IN THE CARRY BIT 
5256 63314 104414 ROMCLK :NEXT WORD IS INSTRUCTION, RONCLK PC=S304 
5257 033150 021364 021364 ; PORTH +LU-17 
5258 033152 106177 146234 ROLB 30MPO4 T QO IN CARRY 
5259 033156 000207 RTS ~—s PC ‘RETURN 
5260 
5261 
S262 033160 GETQI: 
5263 ;THIS SUBROUTINE READS THE STATE OF THE RECEIVE 
5264 !BCC LSB AND PUTS IT IN THE CARRY BIT 
5266 033160 104414 ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
5267 033162 021364 021364 : PORTYeLU-17 
S268 O3-164 106177 146222 ROLB aDMPO4 :PUT QO IN CARRY 
5269 033170 106i77 146216 ROLB = aDMPO4 :PUT QI IN CARRY 
570 033174 00207 RTS = PC : RETURN 
5272 
5273 033176 22800 SYNLD: 
Se74 22900 ;THIS SUBROUTINE LOADS OUT SILO WITH 
5675 23000 !2 SYNC CHARACTERS WITH SOM SET 
277 033176 012737 o00002 o0124%6 23200 MOY —#e, TEMP ;LOAD COUNTER FOR 2 SYNCS 
5278 033204 012761 00026 o00004 23300 MOV #26, 4(R1) : PORT4+26 ears 
5279 O33el2 104414 ROMCLK !NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
5280 032219 122114 23500 122114 ;LOAD SYNC REG 
5281 033216 004737 032176 23600 18: JSR PC,OUTROY WAIT FOR QUTRDY 
S282 033222 012761 000001 coo0o4 23700 MOV #1 -4(R1) ;LOAD PORTS rei 
5283 033230 104414 ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=53C4 
5284 0332032 122111 23900 122111 :SET SOM 
S285 033234 012761 000026 00004 24000 MOV. #26, 4(R1) : PORT +2 ph. 
5286 033242 104414 ROMCLK ZNEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
287 033044 122110 24200 122110 :LOAD OUT DATA WITH SYNC 
5288 03304 005337 001246 24300 C&C = TEMP :DECREMENT COUNTER 
5289 03352 001361 24400 BNE 80s :BR IF NOT DONE 
033254 000207 24500 RTS ~—s PC : RETURN 
5291 24600 
5292 24700 
293 032256 24800 SOM: 
5294 24900 ; THIS SUBROUTINE LOADS SOM AND OUT DATA HITH & 
be05 25000 GARBAGE CHARACTER (0) 
03 737 032176 25200 JSR —- PC, OUTRDY :WAIT FOR OUTRDY 
298 O23262 012761 00000! o00004 25300 HOV LL 4CRL) ORTY+1 we 
033270 104414 ROMCLK iNEXT WORD IS INSTRUCTION, ROMCLK PC=5204 
£300 033272 1e2il1 25500 leeltl SET SOM 
£301 033274 05061 ooc004 25600 CLR YR) SCLEAR DATA 
302 033300 104414 ROMCLK {NEXT WORD TS INSTRUCTION, ROMCLK PC=S32 
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3 302 110 : GARBAGE CHARACTER 
2353 $3300 Abasde 52600 Agetto oe heroes 
5305 2600C 
£306 26100 : 

? 033306 26200 0M: 
5308 26300 ; THIS SUBROUTINE LOADS EOM AND OUT DATA WITH A 
2303 eb400 :GARBAGE CHARACTER (2) TO ENABLE TRANSMISSION OF BCC 
531 737 032176 26600 JSR PC, OUTRDY :WAIT FOR OUTRDY 
2312 RERETE pO 351 000032 000004 26700 MOV 82)4(R1) PORTH? 
5313 14 ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
S314 033322 122111 26900 Le2111 EOM 
5315 033304 104414 ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=5204 
S316 033326 122110 27100 122110 ?LOAD GARBAGE CHARACTER 
6317 033330 000207 27200 RTS PC RET 
5318 27300 
5319 27400 
5320 033332 27500 MESLD: 
6321 27600 ; THIS SUBROUTINE LOADS SILO WITH MESSAGE 
5322 27700 i THE FIRST ARUGUMENT IS THE ADDRESS OF THE MESSAGE 
2323 27800 ‘THE SECOND ARGUMENT IS THE NUMBER OF CHARAC-%S IN THE MESSAGE 
5325 033332 o10046 28000 MOV RO, -(SP) : SAVE RO 
5326 033334 0612500 28100 MOV (RS)+,RO ; RO=MESSAGE POINTER 
5327 012337 001246 28200 MOV (8) TEMP 1 ; TEMP 1 CHARACTER COUNT 
6228 004 032176 28300 1S: JSR outroy :WAIT FOR OUT RDY 
329 033346 112061 000004 28400 MOVB (RO, CRD LOAD PORTY WITH CHARACTER ; 
6330 033352 104414 ROMCLK ;NEX WORD 1S INSTRUCTION, ROMCLK PC=5304 
5331 033354 122110 28600 122110 LOAD OUT DATA pot 9 
6332 033356 005337 o0124¢ 28700 DEC TEMP 1 :DEC CHAR COUN 
6333 033362 001367 29800 BNE 1$ BR BR IF NO NOT “BONE 
5334 033364 004737 032044 28900 JSR PC, OCOR OcoR 
S335 033370 9612600 29000 MOV (SP)+, RG RESTORE RO 

033372 000205 29100 RTS : RETURN 

233g 54500 
5339 033374 29400 = CLRIO: 
5340 29500 ; THIS SUBROUTINE SETS IN CLR AND OUT CLR T 
oail 23600 'CLEAR THE TRANSMIT AND RECEIVE BCC RESISTERS 
£343 033374 012761 o00200 o00004 29800 MOV 8BIT7,4(R1) :LOAD PORTY sat 
5344 033402 104414 ROMCLK : NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
E345 033404 122112 30000 1221 le : SET 
S346 032406 104414 ROMCLK : NEXT HOR 13 INSTRUCTION, ROMCLK PC=S3C4 
E347 O33410 122111 30200 122111 ;SET OUT CLR! 
534e 023412 000207 30300 RTS PC : RETURN 
Fc3 35000 
£351 033414 30600  STFFCL: 
£362 30700 THIS SUBROUTINE ADDS ANY NECESSSARY BIT STUFF CLOCK TI<-$ 
e333 30800 FIRST ARGUMENT IS CHAR, SECOND ARGUMENT IS SHIFT COUNT. 
E355 033414 o1oo4e 31000 MOV RO, -(SP) ;SAVE RO 
£256 033416 012500 31100 MOV (RS)+,RO :PUT CHAR IN RO 
5357 0334e0 012537 001262 31200 MOV (RS) +. TEMPS :PUT SHIFT COUNT | IN TEMP3 
5356 023424 106000 31300 18: RORE RO “LOOK AT NEXT BIT 


D10 
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el BNE LRG nO less 
033612 0 CLR BITCON 11 WAS 8 SPACE, CLEAR 1°S COUNTER 
each RS! R228 ose 12 31588 as: ~— Ftc TCON TRC CONSECUTIVE 1°S COUNTER 
5363 033442 022737 O0000S 033612 31800 CMP 8S, BITCON :1S IT S YET? 
5364 033450 001004 31900 BNE :BR IF NO 
Pb; O335e 005037 033612 32000 CLR BITCON !YES! SO START 
104415 000001 32100 DATACLK, 1 ‘GIVE EXTRA TICK TO SruFF ZERO 

5367 O334%62 005337 O012e52 32200 3: DEC TEMP3 ‘DEC SHIFT COUNT 
5368 033466 001356 32300 BNE 1 ‘BR If NOT DONE 
5369 033470 012600 32400 MOV (SP)+,RO ‘RESTORE RO 
370 033472 000205 32500 RTS RS : RETURN 
5371 32600 
£372 32700 
5373 023474 32800  STFFCK: 
5374 32900 ; THIS SUBROUTINE CHECKS TO SEE IF TRANSMITTER 
5375 33000 !IS STUFFING ZEROS WHEN IT SHOULD. FIRST ARGUMENT 
2308 33100 15 THE CHARACTER, SECOND ARGUMENT IS SHIFT COUNT. 
5378 033474 O10046 33300 MOV RO, -(SP) ;SAVE RO 
5379 033476 012500 33400 MOV (RS)+, RO ‘PUT CHAR _IN RO 
5380 033500 012537 oo1es2 33500 MOV (RS)+, TEMP3 !PUT SHIFT COUNT IN TEMP 
5381 033504 106000 33600 1S: RORB RO ; SHIFT OUT NEXT BIT 
5382 033506 103403 33700 BCS 2g IF IT IS A MARK 
5383 033510 005037 033612 33800 CLR BITCON iT Was A SPACE, CLEAR 1°S COUNTER 
5384 033514 O00416 33900 BR 3$ 
5385 033516 005237 033612 34000 «sas: INC BITCON a “OQNBECUT ¥E 1'°S COUNTER 
5386 022737 O00005 033612 34100 CMP #5, BITCON 
£387 033530 001010 34200 BNE 

033612 34300 CLR BITCON PEs! iy START OVER 
6389 033536 104415 900001 34400 oA : Pai TICK TO STUFF ZERO 
5390 032542 004737 032012 34500 JSR PC,GETSI :LOOK AT WINDOW 
5391 103001 34600 BCC 3$ 1S IT A ZERO, BR IF YES 
5392 033550 104030 34700 HLT 30 "NO, E OT STUFFED 
5393 033552 005337 o012S2 34800 3$: DEC TEMP3 :DEC SHIFT COUNT 
5394 033556 001352 34900 ONE 1$ !BR IF NOT DONE 
539S 033560 912600 35000 MOV (SP)+,RO "RESTORE RO 
52% 933562 900205 36100 RTS RS : RETURN 
5397 35200 
5398 35300 
£399 033564 35400  CTSDLY: 
5400 35500 ; THIS SUBROUTINE WASTES TIME UNTIL CTS SETS, 
et02 35600 :BUT HOPEFULLY NOT SO LONG THAT THE SILO RUNS OUT 
S403 O33SE4 oO1004 35800 MOV RO, -(SP) :SAVE RO 
5404 033566 012700 o0093e 35900 MOV a30,RO _——s ; LOAD RO WITH COUNT 
540S 033572 627777 145406 145404 36000 1S: CMP JTKCSR,JTKCSR  :WASTE TIME 
S406 03 005300 36100 DEC RO : DECREMENT COUNTER 
5497 033602 001373 36200 BNE 1$ :00 IT AGAIN IF = 0 
E498 033604 012600 36300 MOV (SP)+,RO “RESTORE RO 
£409 033606 900c07 36400 RTS pe : RETURN 
E410 36500 
c4]) 36600 
S412 03710 000176 36700 FLAG:  t8<01111119> :FLAG CHARACTER 
6413 033612 000000 36800 BITCON: O 
E414 023¢14 906 12s 252 36900 MESDAT: .BYTE 0,125,252,377 


E10 
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415 933617 77 * 
416 1 00 004 37000 FLTDAT: .BYTE 1,2,4,10,20,40,100,200,376,375,372, 367,257, 337,277,177 
S417 033623 O10 2 O40 
5418 100 200 376 
5419 033631 375 3 367 
S420 033634 357 337 277 
Hel 033637177 
4 36490 100 140 160 37100 STUFDT: .BYTE 100,140,160,170,3,300,174,176,177.1 
S¥e3 033643 i170 003 300 
4e4 0336 174 = «17%si«CiY 
S425 033651 001 
S406 033652 9363 347 317 37200 BYTE 363, 347,317,200,0, 377,377,377, 200,37 
S4e7 033655 200 O00 377 
428 033660 377 377 200 
5429 033663 037 
5430 37300. EVEN 
6431 033664 046377 047111 105 00300 EM1:  .ASCIZ <377>/LINE UNIT INITALIZATION TEST/ 
033722 046377 O47111 Oe0105 OO4OO EMe: -ASCIZ <377>tLINE UNIT REGISTER READ/ONLY TEST? 
033765 044514 042516 OOSOO EM3:  ‘ASCIZ <377>tLINE UNIT REGISTER WRITE/READ TEST? 
O34031 «377 O44G14 042516 00600 EMH: = -ASCIZ «377>/L INE UNIT INTERNAL CLOCK FAILURE 
034073 377 051124 047101 00700 EMS:  ‘ASCIZ <377>/TRANSMITTER DATA ERROR/ 
034123 377 «O4eS22 042503 00800 EMb:  -ASCIZ (377>/RECEIVER TEST/ 
Oayi4e 051377 O4IS05 4450S 00900 EN7, .ABCIZ (377) /RECEIVER DATA ERROR/ 
034167 = «377 O47E15 O42504 01000 EM10: ‘ASCIZ <377>/MODEM SIGNAL ERROR/ 
O34212 355 051124 047101 O1100 EMI: -ABCIZ (377>/TRANGMITTER CRC_ERROR/ 
034242 051377 O4150S O44S0S 01200 EM12: ‘ASCIZ (377>/RECEIVER CRC ERRO 
H3e6 ON4777 O2OT1e O41E02 01300 EMIS: ASCIZ <A7P>/IN BCC MATCH ERROR (LU REG 12 
4326 052377 O40S22 051516 O1400 EMI4: -ASCIZ <377>/TRANSMITTER FAILED TO GO To MARK STAT 
034376 041777 O41101 042514 O1500 EMIS: ‘ASCIZ «377>/CABLE DATA TEST/ 
034417 377046106 04 01600 EMi6: <ASCIZ (377>/FLAG ERROR/ : 
034433 = 37? 051124 047101 01700 EMI7: :ASCIZ <377)/TRANSMITTER FAILED TO STUFF & ZERO 
034477 053503 OS2111 O1800 M20:  -ASCIZ (377>/SWITCH PAC TEST/ 
034520 040777 047502 052122 01900 Mel:  ‘ASCIZ <377>/ABORT ERROR 
034535 051124 O47101 EM22:  -ASCIZ (377>/TRANSMITTER ERROR/ 
034560 044377 04610! 020106 02100 M23:  -ASCIZ «377>/HALF DUPLEX TEST 
034602 047777 OS212e5 051040 02200 EMc4: <ASCIZ <377>/0UT READY NOT SET/ 
03 377 OW7111 OS1040 e300 ENeS: © -ABCIZ «377 /IN READY NOT SET/ 
034647 377 OS4H105 O42520 02500 OHI:  .ASCIZ (377>/EXPECTED FOUND/ 
034670 042777 050130 O4150S 02600 DHe: ‘ASCIZ <377>/EXPECTED FOUND LU-REGISTER- 
034726 941777 040510 O40S22 02700 DH3 ASCIZ <377>/CHARACTER BIT _THAT FAILED: 
034764 041777 OS1117 O4e522 02800 DHY ASCIZ <377>/CORRECT CR HAT FAILED 
035024 042777 050130 O4150S 02900 DHS ASCIZ <377>/EXPECTED FOUND SHIFT. te 
035056 042777 050130 041505 03000 OH:  ‘ASCIZ <377>/EXPECTED FOUND CHARACTER SHIF? 
035124 041377 047514 O4S503 03100 OH7:  ‘ASCIZ <377>/BLOCK ENO NOT SET/ 
035147 «377 OSel22 020123 03200 OHIO: ‘<ASCIZ <377>/RTS DID NOT CLEAR’ 
03300 .EVEN 
03400 
035172 oo0002 03500 71: ; 
035174 003 907 03600 BYTE 3,7 
035176 001272 03700 SAVRS 
035000 003 oo 03800 3,2 
035202 001270 03900 SAVRY 
035204 000003 04000 OTe: 
03520 3 = 007 04190 BYTE 3,7 


od ~ . ' 
025210 O0le7e 04200 SAVRS 
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o3s212 003s 04300 
035214 001270 o4400 
035216 003 ane O4S00 
035220 001264 04600 
O352ee 000002 04700 OT3: 
03520 = 003—Ss«7 04800 
035226 O0le7e 04900 
035230 00s a02 0S0 
03523 001266 05100 
035234 000002 05200 TY: 
035238 006 ~Ss(O 05300 
035240 033032 05400 

002 00e 
001266 05600 
035246 900003 05700 ors 
0 001 oul 05800 
035252 001300 05300 
035254 00}, al 06000 
035256 001302". 06100 
O35260  O0e ~=ss 2 0 
035262 001260 06300 
035264 000003 O6400 OTe: 
035266 001 =~ 06500 
35270 001302 06600 
O35e7e = O01 ~—SsiOL 
035274 001300 06809 
035278 O02 002 
300 001260 
302 O4 1 017 
035309 001 ~SsoO 
035306 001300 ur 300 
035310 O01 ol 07400 
035312 00130¢ 
0353159 003 07 07600 
035316 001272 07700 
035320 O02 001 07800 
0353e2 001266 07300 
035324 900004 O8000 © OTL0: 
036306 012s 08100 
035330 001302 08200 
3320 oll 08300 
035334 001300 og4o0 
0 007 08500 
035340 001272 08600 
O3534e 0 001 08700 
035344 001266 08800 
035346 o00002 08900 OTL: 
935350 003 007 03000 
S2 033610 09100 
035354 O02 902 09200 
035356 O012bt 09300 : 
635360 90000¢ 09400 OT le: 
O353t2 ODE «=H 09500 
025364 033032 5 09600 
035366 002 69709 


036370 O0leSe 09800 
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03900 
035372 10000 . ERRTAB: 
035372 0 10100 0 
374 0000 19200 
035376 000000 10300 
035400 033664 10400 EMI 
035402 034670 10500 DH? 
635404 035204 10600 72 
406 033722 10700 EMe 
035410 034670 10800 He 
035412 035204 10300 Te 
035414 033765 117190 EM3 
35416 034670 400 He 
20 o4 11200 OTe 
035422 034021 11300 EM4 
035424 11400 
035426 11500 
035430 034073 i1600 EMS 
035432 034570 11700 He 
035434 o4 11800 OTe 
035436 934073 11900 EMS 
035440 034726 12000  OH3 
O3544e 035222 12100 013 
444 034123 12200 EME 
O35446 O34647 12300 OHI 
035450 035172 12400 OT] 
035452 034142 12500 EM? 
035454 034647 12600 OHI 
03545 035172 12700 OT! 
035460 034167 12800 MIO 
035462 034647 12900 OK 
035464 035172 oT) 
035466 034213 13100 EMI 
035470 035024 13200 OHS 
035472 035246 13300 OT 
034242 13400 EML2 
035476 935024 13500 OK 
035500 035246 13600 OT 
034213 13700 «EMI 
035504 034764 13800 HY 
06 035234 13900 OTY 
035510 034266 14000 M13 
035512 900000 14100 
035514 oo0090 14200 
035516 034213 14300 EMI 
6520 035024 14400 DHS 
035522 035264 14500 OTE 
24 o24e42 14600 EM12 
0355e6 035024 14700 DHS 
035530 035264 14800 OTE 
32 034213 14800 «EMI 
035534 O3505é 15009 DHE 
035536 035302 15100 O77 
O35540 034213 15200 EMI 
O3ss42 J3c0cé 16300 OH 


DHE 
CJSS44 035324 18400 9710 
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O3S5S46 034242 tee pe at 
ee ie a 
pseeee g3s0S6 16900 DHE. GHLT 
035324 1600 DT10 
035562 034326 16100 EM14 
035564 000000 16200 0 :HLT 
035566 000000 16300 QO 
035570 034376 16400 EMIS 
035572 034647 16500 OHI > HLT 
035574 035172 16500 OT1 
034417 16700 EM16 
035600 034726 16800 DH3 > HLT 
035602 035346 16900 O71! 
035604 034242 17000 + EMle 
035806 034647 17100 DH1 sHLT 
035610 035360 17200 © OTle 
O3S61e O34433 17300 EMI7 
035614 000000 17400 «€6—0 >HLT 
035616 000 17500 
935620 034477 17600 EMeO 
2 34647 17700 DH1 > HLT 
035172 17800 =6—OT1 
035826 034520 17900 = Eel 
035630 035124 18000 OH7 sHLT 
035632 000000 16100 O 
035634 034520 18200 EMe21 
C35636 034726 18360 ODH3 sHLT 
035640 035222 18400 DT3 
035642 034535 18S00 EM2e2 
644 035147 18600 OHIO sHLT 
646 000000 18700 O 
035650 034560 18800 EM23 
652 034670 18900 DHe HLT 
335654 S204 19008 OT 
656 034602 19106 EMe4 
035660 000000 192 :HLT 
O3S5t6e 000000 19300 
035664 034625 19400 3=6EMeS 
035666 000000 19500 sHLT 
000000 19800 O 
035672 034123 19700 EME 
034670 19800 DHe > HLT 
035676 035204 19900 bTe 
035700 034073 26000 EMS 
0357 035024 20100 HS sHLT 
935704 O352%6 20200 OTS 
035706 O34266 20300 €EM13 
035710 O34647 20400 Ox] >HLT 
O357le o3Si7e 20S00 «#1 
20608 
ey 50700 
se) ceUsgg 3 CORMAY: 
009901 €1200 # .END 
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ig . 72 
ant es eee 

or aed, 2, 33 ane 35394 3624 3676 3706 S224 

Sue cig oapes 2308t 2 23, aeee 2460 246S*# 2469 247 1% 25044 25374 2c544 cbelet 


ae ee ee a a 


BITO = 000001 958 1155 1156 

8iT1 = o00Cde 348 $31 1149 1155 1156 1449 1S32 1S45 

SITio = 002000 8S# 1513 1524 “ 
BITil = 004000 848 2057 2094 el4e 2206 e280 2354 2424 2505 esgs 2672 2746 


2837 2869 2909 2943 3000 3046 3092 3138 3189 3280 3371 3417 
3587 3669 3749 3832 3923 4055 4125 4439 4764 4832 4934 


8I1T12 = 010000 S38 «1464 = 1543 
si : Soom ay Be SS Be RRB RR os en we 
= % 2 4 
BTS 5 808 48 S72 290 24, 238 1451 cf 
BIT2 = 000004 938 «= S31 7100s 1156 
8IT3 = 000010 928 1549 1556 ©: 3348 
BIT4 = 9000c0 Sie 1139 1162 116% # #=2178 #2957 3014 3060 3106 3152 sce2 So64 
BITS = 0 90s 1661 1761 2117 2254 24020 «ia2SS9)ssiéi32?——“‘é7GQZ 
BIT& = 000100 8S5e i144 1145 1551 284 2886 e918 
BIT? = 888 1145 1265 1661 2150 2 §343 : 
BI78 = 000400 878 15°39 1538 1840 1553 1555 1561 1564 #1622 
giT3 = 991950 Be! bei 1523 ©«4«1535)~Cfs«d15B1)~Sssia1SBEY—sdtBZO—SCédLCS2D 
3 
BRLYL 012252 1617-1627 ~Sss«163S~—Stsé«dL'SH7'Ww 
=. Bee Os 
‘x 7 t | 
CaLscc 033032 3443 3473 3531 3561 3613 3643 3695 3725 37989 3994 395: 39768 
4158s «483% 4184 4239 4ob4# 4265 4364 4407 4473 449e*e 9499 8 4672 
4598 4697 4740 4844 4B47% 4904 4S4E 4949 4934 519&+ =1s7 51994 
“ S206 Se07* Sell Sel8s S431 
CHAR 032230 3281  SO72s 
CHARSD 032342 2949 3006 3052 3098 44 S099 
CHRCNT O04712 963% 966 9? 9ss* 1004s Os 
CK 007606 512 779 Bll 10c6 leles 
CKSWR1 007666 12258 1237 
sees Bee 
8 
CKSWRY 007710 12318 1239 1246 
cK SHAS 10014 el. 1e200—Sss«12SSe 
~~ g 
CLRIG 033374 2056 2093 ely 2204 2278 2362 2423 2503 2583 2671 he 2604 
ot 5208 §242 52ge 3048 bi abz8 3355 3553 25,3 3835 04©=s 398 
: 4120 «4434 «= «4763s—id4BBLSsi4933)s«S 32398 
ENeRE Mate bEF ie 484 48 48 1293 
Wi 
Ny HA FRAC 18. 3 738 74 74 34 1060 1062 1122 @#©1228 
CONERR 007223 621 11878 
CONN 007118 11878 1469 
ENTE tae §20 e33" 629 1076 139 
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a oe 
é 

.CC= 4 4 3 3 0 3620 3672 
Groce TE Ao Se Ge RE BN, 
CRC16 = 120001 S2c0s 
CREAM 001320 1958 483% 1289% 1290 le9e# 1296 
CSR 510 11878 1395 
CSRMAP 010514 13708 
CTSOLY 033564 53998 
a a aS Mr 

* é 

DATACL= 104415 241@ 2101 2149 2153 e221 e223 2237 


DATAHD 005204 1048* 1070 10738 
DELAY = 104413 237% 
DEV 004370 877% g12 922 
DEYTAB 003010 583 64 
1 SY4E47 54318 
DHIC 035147 S431e8 
D2 034670 S4318 
DH3 034726 S4318 
DH4 034764 S431la 
DHS 035024 S4318 
SOSs S4318 
DH7 035124 S4318 
DISPLA 001200 1428 498# So4v* 735* 
DISPRE 900174 legs 504 ' “ 
CTV BO 30k 189% Se 676s 77 1280 1294 1376+ 
CM 00 634 11878 
DMCROO 001500 2798 
DMCRO1 001510 2848 
DMCRO2 O01 2898 
DMCRO3S 001530 e348 
DMCROY 001540 2998 
DMCR 001550 3048 
DMCROB 001560 3098 
DMCRO7 001570 3148 
DMCR 0016 3198 
DMCR11 OO16 3248 
DMCRi2 O00ib20 3298 
OMCR13 001630 3348 
OM 001640 3398 
OMCRIS OO01650 3448 
DMCRIE OC16E0 3498 
OMCR17 001670 3548 
DMCSR § 001494 eb28 Sbee 602 607% bles 647 765 
1356 1678 
DMC SRH 00140 2638 Ll44*# I LI14Ss4 11198 115S# 11562 1162s 
INC TL 14 i3ll 


1908 479 7$i 1374# 1389¢ 1568# 1565 


3702 


1S77# 


802 


L164# 


1578 


3755 


1533+ 


1094 
1307s 
1580 


3838 


1584+ 


1117 


130S# 


3945 


163 
1389 


4152 


1298 


130? 
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DMPOS)§=6- 001412 265@ 1133* 1139 1176 1181 1311# 1312#% 1313 5009 6022 
S2b8% Seb9s 
OMPOB 38001414 bbe hee ize aise 
\ e b | * (% 
Braet BBLirs sey ET TSE RB. aus 
oe 
101 ae 2ese 
DMS102 001S2e2 2908 
OMS103 001532 2958 
DMS104% O01S4e2 3008 
DMS10S 001552 3058 
DMSi06 001562 3108 
DMS107 1S72 3158 
DMS110 tae 20s 
DMSi1ll l6l oss 
DMSll2 O0lb2e 3308 
DMS113 001632 3358 
DMS114 OOl164e 3408 
DMS11S O016Se2 3458 
DMS11&6 O0166e 3508 
DMS117 001672 3558 
DMS200 001504 2818 
DMS201 001514 28ts 
DMS202 001524 231s 
DMS203 001534 2368 
DMS204 001544 3018 
DMS20S 001554 306% 
DMS20& 001564 311s 
DMS207 001574 3168 
DMS210 001604 3218 
OMS211 001614 3268 
DMS2i2 001624 3318 
DMS213 001634 336% 
DMS214 OO1644 3418 
15 OO16S4 3468 
OMS216 OO01664 3518 
DMS217 001674 3568 
001506 2828 
DMS301 OO1516 2878 
OMS302e 001526 2928 
DMS303 001536 2978 
DNS. 001546 3028 
DMS30S OO1SSE 307% 
001566 3128 
DMS307 001576 317% 
310 OO1606 3228 
DMS311 OOl1616 327% 
3i2 001626 3328 
DMS313 001636 337% 
DMS314 OO1E4E 3428 
DMS31S OO1ESE 347% 
DMS316 OO1bEE 3528 
OMS317 OO1b7E 3578 
OMTLYL 001402 ecble 1320# 13218 
DMTVEC 001400 e608 1315# 1319% 1320 
DOM.END 001700 3598 1372 


SOE4 


5180 


S2Se+# 


L10 
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OM.MAP 001500 19S 2788 483 S36 S46 662 1290 1292 1370 1375 1605 
D 003734 784 786% 8068 1lelb# 
OT1 03517 S4318 
DT10 324 S4318 
OTll 035346 S4318 
DOTle 35360 S4318 
OTe 035204 S43l8 
DT3 035222 S4318 
DOT4 S43le8 
OTS 0 S431s8 
DT& 035264 S4318 
DT? S4318 
EM] 033664 S43l8 
EM10 034167 S431s8 
EM11 034213 S4318 
EMle2 034242 S4318 
EM13 034266 S4318 
EM14 034326 S4318 
EMIS 034376 54318 
EMI1E 034417 S4318 
EM17 034433 54318 
E 033722 S4318 
E 034477 54318 
E 034520 54318 
EMe2 034535 S4318 
EM23 034560 S4318 
E 034692 S4318 
EM2S 4625 54318 
EM3 033765 S4318 
EMY 034031 54318 
034073 54318 
EME 034123 54318 
EM7 034142 S4318 7 : Hs 
EOM 033306 3933 3934 4063 4084 4135 4136 4140 4141 at 4450 ae ce 44S& 435) 
4852 4BSE 4857 4861 4862 4953 4954 53078 

ERCTOO 0017C4 3668 
ERCTO1 001710 3698 

CTO02 001714 3728 
ERCTO3 001720 375% 
ERCTOY 001724 3788 
ERCTOS 001730 3818 
ERCTOB 001734 384% 
ERCTO7 001740 3878 
ERCT10 001744 3908 
ERCT11 0017 3938 
ERCTi2 001754 3968 
ERCT13 001760 3998 
ERCT14 001764 4028 
ERCT1IS O01 40S8 
ERCT16 001774 408% 
ERCT17 OO 4118 
ERR 002700 592 6188 622 
ERRCNT OO0le32 1638 747 774 1087* 1305+# 
ERRFLG OC1325 20e8 481s 733% 795* 1037% 1050 1064# 11234 
ERRMSG 172 10474 6S 1068s 


0 10 
ERRPC 002770 624 640% 


M10 
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0978 
FaI0e°. BBSREE img, 
Xx 00S2Se2 1082 10878 
a ee ee 
FLTDAT 4838 484 48S4 4859 4867 4907 S41l68 
BETO! REET eH see 352 ese 3634 3638 16 3720 3866 3870 S2bes 
GETQ@O O33146 3434 3438 3$21 3525 3604 3608 3686 3630 3782 3786 SeSes 
GETSI O37: 2226 2230 2240 2244 2300 304 2314 2318 2374 2378 2388 2392 2442 
24ue 2461 2466 2473 2526 2530 2S41 2545 2610 2614 2628 2632 2695 
2699 e711 2720 2764 277 3 3955 3359 3982 986 4005 4009 4020 


4308 431 44 4481 4504 4 4 
4607 4626 4630 4641 4650 50038 5390 
HALTS Q0S22e2 1033 10798 
HILIM OQO4366 876% 303 Sels 
ICOUNT OO0ie2e 1598 793 798% 
007S0e 846 882 12028 
INCHAR 010020 1231 12598 
INIFLG 001324 2018 507 S27 S34# 
INRDY 032652 3193 3243 3287 3295 4067 4080 4085 4330 4344 4349 4373 4387 4392 
4663 4677 4682 4706 4720 4725 4785 4795 4868 4884 4889 4959 4974 
4979 51688 
INSTER= 104404 2238 897 
INSTR = 104403 eel# 1329 1381 1394 1403 1482 1491 
INSTR2 0041 853 865% 
INTTY Ol12266 1414 1431 1441 1454 1470 16558 
0073 637 11878 
LIMITS 004314 892 9038 
00701 11878 1483 
LOBITS Q0437e 878# 907 9238 924 po 
LOCK 001220 158% 797# 814 1779% 1795* 1821% 1837% 1863% 1886* 1921% 1941% 


816 1056 
3409% 3447" 34Y91# 3635 3579% 3617%  3661*  3699% 
001326 
LOLIM 00436 


4364 875" 905 9208 
LPCNT O01224 i608 792% 793 796% 
LRC8 = 000200 52198 
LSTERR 001234 1e4e = 490% = 732 «61034 =Ss1036* = 1124 
LUTYPE= 900000 5188 
MASKX 001244 1728 
MASTEK OO6142 1058 = s:11878 
MCRLF 005672 831 954 1054 1055 1063 11878 1328 1390 
MCSRX 006072 737s 11878 
MOATA 007544 984 4 12048 
MEMLIM 001304 igse 700% 
MEPASS 005733 736 = «11878 
MERRPC 006217 1061 11878 
x 006117 11878 
MERRe 005760 11878 
MERR3 QO6005 673-1187 , : Saas 
MESDAT 033614 3380 3924 3931 40S 4061 4126 4133 4138 4224 4329 #94372 4HHO 4447 
4453 4557 Yeb2 S705 —s78SF70 P75 SHO 4951 4988 SH1e c 
MESLD 033332 eds 3379 3980 H0BD 132 4137, 444 (iS H7ED77H = SHB SSS 
8 


MILK 001322 1968 4E4# 745 12e88* 1293« 1297 
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MLOCK 006043 714 11878 
MNE Wd 006144 668 11878 
006704 11878 81453 
; 106 741 11878 
MPFAIL 005675 1121 11878 
OOS&66 861 1878 1352 1427 1437 1447 1462 1476 
00575 723 11878 1346 
MRESET= 004000 968 
MSTCLR= 10441e 2358 1126 1725 1749 3 65 e3 


MTITLE 001000 1368 
MTSTN 006130 1089 11878 §1330 
MTSTPC 006031 11878 
MVECX pee 7 3 ijgre 
lel6 1$78 1092 1676 1700® 1723% 17478 1778% 


3408 3490% 3578% 3660% 3741* 3824% 3912 4048s 
NITCH O3204e S009* S010* SOl1# SOle*# SO14s 
NOACT Q07154 S23 11878 1282 
NODEV 002674 $77 6168 
N 6450 11878 1382 
OCOR 032044 2100 2148 2218 e232 2366 2518 2604 2687 
4065 4142 4457 4772 4777 4863 4955 50178 
S248 5334 
603 6108 639 
001302 1878 5431 
OUTRDY 176 2207 e214 2281 2288 2355 2362 24e5 2506 
2675 2683 2747 2871 83 3929 4059 4131 
5082 5091 5104 5108 5128 $137 $235 S244 
PACTOO 901702 3658 
PACTO! 0017 368% 
PACTO2 001712 3718 
PACTO3 001716 3748 
PACTOY 001722 3778 
PACTOS 001726 3808 
ACTOB 001732 3838 
PACTO7 001736 3868 
PACT10 0Q01742 3898 
PACT11 O01746 3928 
PACT1l2 001752 3988 
PACT13 001756 3988 
PACT14 001762 401s 
PACT1S 001766 4O4s 
PACT16 001772 407% 
PACT1? 001776 4108 
PARAM = 104405 2eeS# 1331 1383 1396 1405 1484 1493 
PARAM 004234 8818 898 
PARBIT= 00 36% 
PARERR 004310 884 886 888 897% 904 906 908 
PASCNT 001230 l628 734# 738 746 771 1304+ 
PERFOR= 004537 968 
PFTAB O05430 ll2e 1128s 


POPRO = 012600 728 1086 


PAGE: 
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= 708 
ta, 748 801 
PRIO 00654 11878 1413 
PS pete 4 4768 711# 16178 16278 
10046 7l1@ 1083 
PUSH1S= 00S746 638 
QV.FLG tea ae 4BOe 750% 730 
Bpe35: ieee e 
005350 1108 11148 

RESTRT 003534 749 753 7618 

RESOS = 104407 2298 1078 

RETURN 001214 1568 4928 720% 724 761# 739% 803 

ROMCLK= 104414 e398) «61194 1137 1174 1179 1680 1703 
1826 1828 1839 1841 1871 1873 1 
1997 2021 2030 2054 2059 l 2065S 
2144 214s 2151 21sS 2165 2175 e202 
2285S 2290 2326 2350 2357 2389 2364 
2510 2516 2557 2S81 2591 393 2597 
2743 2749 2751 2754 2756 2758 2802 
2878 e882 2914 2939 2HS 2347 
3010 3019 2 8 3050 3056 
3140 3142 3148 3157 3180 3194 3227 
3326 3329 l 3373 3377 3385S 
3762 3766 07 3845S 
“ 4118 4331 4345S 43S 4389 4374 
4683 4692 4707 4721 4726 4761 


7S 
$051 S062 $080 S084 5087 $093 a10e 


Si61 5178 5233 5237 S240 5246 
6313 315 = $330 5344 0 S346 

! 001316 1938 «6 485*# «= 1DBGe | 1287* = 1294 

SAVACT O0i3le 1918 = 671_~—s«1588# 

NUM 001314 1908 «479% = 74Ge = 751# = «1581 

SAvPC 001276 1858 beet )= be 92Ge = 1099 

vRO 001260 1788 «= 938 «= Hs SH 

SAVRI 001262 1798 = begeG7# = 44 

VRE 001264 1908 «= 936 «= 945s S31 

SAVRS + 001266 1gis «= 93S*# GCS] 

SAVRY 001270 igs «934k =H? 

SAVRS 001072 ig38 «= 933% «= 48s 43] 

SAvVSP = 001274 184s 

SAVOS = 10440 2278 1038 

SCHAR 032646 3183# 3184 3230# 3231* $120 $138 5143 

SCOPE = 104400 2i5e i688 i711 1735 1766 1608 1850 
2122 «2182 )=S eS?) 2331 = HOS) B22 
2922 «6980 3028 «S072 «2S 3118 «= 3164 = 3209 

: 3647 «3729 3B8le «= 3898 = 4035) 4097) 4410 

SCOP1 = 104401 2178 1794 1807 1836 1849 1882 1903 

¢ 364% ©3698 «= «3728 

SILOLD 932406 3190 3206 3240 32 S11Se 

SIMECC 03270 3429 34593516 = 3547 35 3 3681 

' : 4469 6 4see Ss B42 Sl gee 

SKIP s73.§76—i“‘dz&&w?OOCOSCt*«é 

Sof Tsw 015052 122512688 

Sim 03326e 4451 52938 


Poo IBagenenaseseg 


203° 
e950 
7? 


3834 


4154 


POSE: 


ae ae 


3134 


2074 
289C 
3885 
3564 


4235 


013: 
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NT= 904713 4s 988 -981# 10058 
734 11878 14 
TACK = 001200 é4e #9477 «690 1093 1116 
eratl Oot ate 1 3320 «33220 33M6 
a S 
Tate SOL356 sesy 13055 1558 = B08 
STATS © 001372 2538 © 1303# 
STFFCK 033474 2543 b3eCsi«‘iS 2 i77H——sCWSG SS 3%HD 2S «3990 
4584 4611 «53738 
STFFCL 939414 Si44 53518 
STRTSH O012 ieee S13# Slee S17 S19. 52983 
STUFDT 033640 2432434 Su228 
STUFLG 032650 3186+ 3233* S14] SisS* Si65e 
svos_ 04402 9338 
SWFLG © O10016 480+ 825 1224# 1251# 12578 
Swe S 205 11878 ©1227 
SHES: 907218 11878 1230 : 
Sur 1 14380 4997 «= 499'si—iS# = sS19s—s«G7Ls 
1 1988 1090 1152 1212 12500 
SWREG 000176 1e9a «6 503.—Ss«deie = 1270 
Sw0O = 90000! 458 «§17,—s«1377~—Ss«16 OL 
SwO1 = O00002 448-7210 1323, «1347 
SwO2 = OO0004 438 
SwO3 = 000010 428 666 
Sw04 = 000020 418 
SwOS = 000040 408 
5w06 = 000100 338 «1152 
SwO7? = 000200 388 
SwOB = 000400 378 ©1088 
Sw09 = 001000 38 © B12 
Suid = 002000 358 1090 
SWii = NO4000 348 788 
Swi2 = 019000 338 «6827S: 1027 
SWi3 = Oe0000 328 ©1032 
Swi4 = 040000 318 
SWiS = 100000 308 
SYNC 32062 2807 «28392911 = S027" 
SYNLD 033176 6 38639 3998 4058 94130 «4444 = 4767 
TEMP = OOL41E 2718 971 11i8* 1119* 1160# 1165* 11718 
TEMP1 01246 1738 6 -537# «61189 = 16 13® §=«1b14* «= S032" «= SO44s 
Sig4# Se0ee S2id*e 5213% Sel¥* Se3le Soves 
TEMP2 001250 174e «= -§38# «61191 «= 4361% «43628 «= 4363 YH 
47384 47 490i# 490ce 4903 4991* 49928 


TEMPS 001254 1768 S4l# 1195 1399 1402 1408 1411 

TEMPS = O0leSé 1778 Su2e# 1197 1380# 1393# 1599 S060 
TIMER = 1OW41E e438 2063 292 3009 3055 310i 3147 

TKCSR 001204 1488 848 12S9 1655 S40S 


3367 


4170 


666 


4833 


3369 


4197 


712 


78° 


4826 
4251 


721 


Ble 


S2738 
2 


4928 


4e78 


1323 


‘cs° 


ove / 


PAGE: 


1032 
: - 
ee 


0132 


ONDONO000NO 
— bb ob 


w 
a 
fo 


“) 
iat) 


rs 


ob ob ee ee ee 
www 
—- Ce r in = 
trur 


— 
“J 
o 
& 


ONVOOOVVOOOVO0O00000 


? 
3 


49988 
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Dll 


1 1343 167S# 
9# 2086#  2134# 
2861# soy4% 2934# 
3489# 77* 3659+ 


PAGE: 
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TST61 031450 4823 49248 4998 
ToTg = eeeeee 1358 1861 
Ff ll 1 8 
trey Base t8 sie, SE zes rigs rae 
TWOSYN= 010000 368 
TYPDAT 1053 1071 10748 
TYPE = 104402 2198 Sil S23 $35 620 62S 633 636 668 673 714 722 72 
73? 739 741 743 831 944 861 954 994 10S4 10ss§ 10Sée 1355 
1061 1063 1067 107 llel 1227 1230 1282 1328 1346 13Se2 1390 1sl2 
1426 1429 1436 1433 1446 1452 1461 1468 1475 1590 
TYPMSG 005106 1Ga} 10548 
VEC 006526 11878 1404 
VECMAP 012010 1$89 i601s8 
WHICH OQ12002 1392 15978 
WROCNT 004710 362% 99S*# 10038 
WRKO.F 005174 1066 10698 
x 1028 1030 10328 
CSR 003546 738 7638 
XERR 0023S$70 744 7728 
006224 11878 
XLOC 003022 $93 b11# 614 645 658s 
¥PASS 003562 42 7698 7 
XPOLY 033030 3420# 34S0# 3502 3538% 3690# 36208 3672+ 37022 #3755 3838 394S# 441S5e* 4223 
Pt 44678 44S66# 44834# 4936% S204 S206 S2l7s8 
KXSTATG OO74S4 S44 11878 
XTSTN Q05330 1060 11008 
XVEC 003SS4 740 7668 
ZERO 061300 1868 S431 
$OOD = seeeee U 
SCRAP = 177777 ls 16658 1668 16718 16898 1692 16958 17128 1715 17188 17368 17393 17428 
17678 770 17738 18098 1812 181S8 18Sle 18 18578 19098 1912 191S# i961 
19678 19838 19898 200Sse 2008 eOlis 2038 2041 204Ss 20758 207 
2 ele3# 2126 21308 21848 2187 21938 ecSSs 2261 22678 23328 2335 23418 
24068 2409 C4128 24838 2486 24928 eSb3e 25 25728 26528 2655 26608 27278 
27 27348 27878 27 27938 28198 2822 28eSs 28518 28 8578 e38sis 289 
28978 29238 926 29308 29818 4 29878 30c278 30338 #30738 30798 
31198 3lee2 3ieSs 31658 316 31718 32108 3213 32188 32608 32 32688 3305s 
33128 33538 33598 33968 3399 34038 34788 $348 348Ss 3S6&8 
35738 36488 cl 36558 37308 3733 37368 38138 816 38198 39078 
40368 4039 40438 40988 4101 41098 44lle 4414 44238 47448 4747 47528 4808s 
‘ ee 4811 48188 49ll8 4914 49208 
SENDAD 003522 le3 509 7558 1079 
hi = 00006! le 1665 1671 1673 16788 1689 1695 1697 17028 1712 1718 1720 1725 
17268 1736 1742 1744 1749 17508 1767 77 1775 1781 17828 190 1gis 
1817 1823 18248 1851 1857 18S9 1865 18668 1909 1915 1917 1923 19248 
1961 1967 19693 1974 19758 1983 9 1991 1996 19978 2005 201 2013 
20i8 20198 2038 2045S 2047 2eCSe 20538 2075 2082 2084 2089 20908 2123 
2130 2137 21388 2184 2193 2200 22018 2258 2267 2269 2274 
22758 8 2332 2341 2343 2348 C3498 2406 241 2414 2419 24208 2483 2492 
2499 2S008 2563 2572 2574 2579 eSe0s 26Se2 2660 2b62 2667 26638 
2727 34 6 2741 27428 862787 2793 279 2800 2e80ls8 28i9 82S 2827 
2832 28338 Sl 2857 28s9 2864 e6658 2891 7 e339 290 23058 29c3 
2930 $32 2937 29388 2981 2989 2394 29958 3027 3033 3038 3040 
30418 073 3079 3081 3086 30878 119 312 lei 3132 1338 3165 7 
3178 21798 210 3218 3220 3225 22268 3260 3268 3270 3275 327&8 
3305 3312 3314 3319 33208 3353 3359 3361 3366 33678 33% 3403 3405 


Fill 
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3411 34128 347 3485S 497 3493 34 
3655 ? 3663 36648 3730 7 738 
38278 3899 07 3 14 39158 4036 
vais Hise” as este at? aD 
$s = 009063 le 1676 158s i358 17028 1334 135e 
18668 192 19248 1972 9758 3994 
20908 AEF 21388 2198 22018 4H thy 
4 
aose | Sage » 5888 iaes 
3223 32268 3273 32768 3317 33208 
35828 60 36648 3741 “7448 3 38278 
ve 4428 44318 4757 47608 4823 4Bcbe 84925 
=: = 000017 ls 2078 els 2178 2198 2218 2e38 
“ 2378 2398 e4le 2438 e4ss 
= 035714 1088 109 lles 1198 1248 1278 1318 
2728 2778 2738 280s ebls 282 284s 
2928 ess 958 c3968 2978 2398 00s 
3098 3108 ai48 3128 3148 1Se los 
3258 3ebs 3278 3238 3308 318 Jee 
ai48 2 8 44a 3458 3468 78 ae 
c/s 1 2s 6578 7 110 lle 
1378 1422 1542 1546 1593 1624 1656 
4318 4651 
BEGIN 903152 £908 
CNVRT O0447e 234 ssa 
CONVR OO44EE 232 gshe 
I oossse Ese 11598 
DELAY OOS436 238 11328 
003364 7318 4925 
ERRTA 035372 1046 S43ls 
4759 S 10268 
INSTE QO041S4 224 8618 
INSTR O040S0 222 8408 
INST] 004076 8448 864 
MSG 00407 42s 8458 
MSTCL OQOS4EE 236 11438 
. PAR 004174 226 8728 
-PFAIL O0S23€ 113 WTS 1107# = =§=61115 
RESOS 004434 230 9438 
FOMCL OO0SSO4 240 11488 
V 004374 228 323 
C 003576 2lé 7738 
SCOP! 003736 218 Bilis 
START 002002 132 4768 492 1247 
TIMER OOSE1E cae 11708 
TRPSR OO471E 7 «19148 
TRPTA 901336 2i48 1019 
-TYPE  4OO0376€ 220 S228 


Gll 
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DMEND ls 725 

DMERNT 8 

HLT 758 =61687 1710 1734 1765S 1793 1806 1835 1848 1881 
2027 2936 2072 2110 2120 216 6426 2181 2228 23 
231& 2320 2330 2376 2380 233 94 404 a4 44 
2543 2547 2612 2b1S 2630 2634 2697 2701 2713 
2843 2883 2321 960 2972 29793 3017 0eS 3063 3071 
3250 3234 3336 3351 3394 3436 3440 3466 3470 
3610 3636 3649 3688 Se 3718 3722 3784 3788 3868 
4007 4011 2 031 4074 4093 4164 4168 4191 4195 


$AEORT le 3260 
SALTO le S47 
Ct ie 339% #3478 3566 23648 
SBINCR ls 3730 3813 
NWI le 2563 
FE ie 1199 
$CDATA le 4808 491 
$CLOCK is 2005 
SCOMP ie 2884 2955 2967 2974 3012 3021 3058 #3067 3104 
é 3343. «4088 «44352 ss«d439S)—ssges «= 4728 = bes) :3582 ‘ 
CRC e 318 3448 3500 3536 c %i8 3670 3700 
SCRCSH le 3749 3932 
SCYCLE le 1271 
SEMPTY ls 4744 
SE OP is 725 
$F INI is 4958 c Ee 
FLAG le #222 22% © 237 2438 4s 2S22siDGSC«‘ikOCC2771 Ss‘ 
SFLOAT le 1867 1887 1925 {[9e 
$GETPA is 
SHALF i 
SHE ADE Is 
SINACT le 2787 2819 2891 
SINIT ls 
$LINE! le 1851 1909 
$LUl le ieee i684 1712 1736 
$LUl2 ls 1767 
SLU? is 1809 
SMARHI ls 
MARK Is 
SNATCH Ie 4077 4340 4383 44673 4716 4e8o 4970 
SHOCK is 
SMODEM le 3305 
MSG le 1187 
SMULT le 2652 
SPATTE le 3165 3210 
SPFAIL is 1103 
$000! 1s S252 sSebe2 
$QUEST ie 138! 1394 1403 142 1491 
“ch t' ty ? ? 79 80 703. «17 S 1784 
ROLE 2 iM 4 i744 oA 16 17 (ae ’ 
1635 1641 Sc 
2959 201 49 20S S209] 4209] 439 2098 «= 210321132139 2144 
ee02 «= si«aeSSsiP1SsiéBRG SCS) C760SCie@)~SCeSSe—(“‘éiVG 
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DO! MACY11 30(1046) Ll-JUL-77 11:59 PAGE 1 


DCCOME P11 12-MAY-77 14:18 CROSS REFERENCE TABLE -- MACRO NAMES 
2421 2427 2429 2501 2508 2510 2516 e557 2581 
2677 26? 685 743 749 751 7S4 756 758 


3e 
337 3384 3413 3439S 3883 3665 4S 8 376 
3893 3916 40S2 4068 4081 4086 4095 4118 4331 
4 weiss 4678 4683 4692 4707 4721 4726 
4869 4885 4890 4899 4931 4960 4975 4980 4989 
S0S1 S062 0 5084 S087 5093 S106 5109 S126 
2633 S237 S240 S246 S256 S2b6 $279 $283 286 
SRCRC le 4036 
SFEC tH 2 298! 3027 3073 3119 
$ 775 
$SIMBC ls 5198 
S ls 28S) 
$SOFTC ls 1207 
SSTUFF ls 2406 
SSWPAC 1 1 1983 
CHAR ls 3922 4055S 4125 4439 
$TCRC is 38993 4098 4411 
$TRANW ls 3944 41S] 4232 4466 4565 
STRANI ls 2038 2075S 2123 
Pp wel” 21s 217 213 221 223 2e5 227 229 
$TSTN ls 1673 1697 1720 1744 1775 1817 gsg3 1917 
2195 2269 343 2414 2434 2574 2662 th 2755 
3081 3127 173 2220 327 3314 3361 40 487 
4111 4405 4754 4820 4922 
SVARIA ls 134 
SWINDO re 2184 2258 2332 2483 i 
x2 18 1665 1671 1689 1695 \7le 1718 1736 1742 
1909 1915 1961 1967 1983 1989 2005 2011 2038 
2193 2258 2267 2332 2341 0& 2412 2483 2432 
2737 2733 2819 2825S 2851 2gs7 2891 2897 2323 
3079 3119 312s 3165 3171 210 3218 3260 3268 
3478 SHES 3566 3$73 3648 3655 3730 3736 3813 
Re 4109 441) 4423 4744 4752 4808 4818 4311 4920 
ZEROS ls 27e7 
23S. 6035714 000 


ERRORS DETECTED: 9 


REDIE  DZOME 260, “ORES TPLUTL, DZDOME “ES: LUT YPE 
RUN-TIME: 17 23 1 SECONDS 

RUN-TIME RATIO: 357/42 =6.0 

CORE USED: 3eK (63 PAGES) 
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